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