Bug 132634 - remove warning in reports.cgi when quips aren't used. Patch by cedric.caron@urbanet.ch; fixed up by xor@ivwnet.com; 2xr=gerv.

git-svn-id: svn://10.0.0.236/trunk@117306 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
gerv%gerv.net
2002-03-23 13:47:31 +00:00
parent cf03b9b3e2
commit 9961bec6d7

View File

@@ -334,7 +334,9 @@ FIN
push @cdata, $_;
}
close COMMENTS;
$quip = "<i>" . $cdata[int(rand($#cdata + 1))] . "</i>";
if(@cdata) {
$quip = "<i>" . $cdata[int(rand(scalar(@cdata)))] . "</i>";
}
}
}