--- loncom/cgi/graph.png 2002/01/22 15:12:05 1.7 +++ loncom/cgi/graph.png 2002/01/23 12:39:19 1.8 @@ -1,6 +1,6 @@ #!/usr/bin/perl # -# $Id: graph.png,v 1.7 2002/01/22 15:12:05 minaeibi Exp $ +# $Id: graph.png,v 1.8 2002/01/23 12:39:19 minaeibi Exp $ # # Copyright Michigan State University Board of Trustees # @@ -53,7 +53,8 @@ my $Range; if ( $PNo > 10 ) {$Range = 30*$PNo;} else { $Range = 300+30*$PNo; } -$Max += (10 - $Max % 10); +$Max+=(10 - $Max % 10); +$Max=int($Max); my $MyGraph = GD::Graph::bars3d->new($Range, 400);