--- loncom/cgi/graph.png	2002/01/23 12:39:19	1.8
+++ loncom/cgi/graph.png	2002/02/01 11:47:34	1.9
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# $Id: graph.png,v 1.8 2002/01/23 12:39:19 minaeibi Exp $
+# $Id: graph.png,v 1.9 2002/02/01 11:47:34 minaeibi Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -27,14 +27,15 @@
 # The LearningOnline Network with CAPA
 # Behrouz Minaei
 # YEAR=2001
-# 9/13/2001, 9/25/2001, 10/6/2001, 10/9/2001, 12/25/2001
-#
+# 9/13/01, 9/25/01, 10/6/01, 10/9/01, 12/25/01
+# YEAR=2002
+# 2/1/02
 # A CGI script that dynamically outputs a graphical chart for lonstatistics.
 # 
 #### 
 
 use strict;
-use GD::Graph::bars3d;
+use GD::Graph::bars;
 use GD::Graph::colour;
 use GD::Graph::Data;
 
@@ -51,12 +52,12 @@ my @data =(\@xlabels,\@data1);
 
 my $Range;
 if ( $PNo > 10 ) {$Range = 30*$PNo;}
-else { $Range = 300+30*$PNo; }
+else { $Range = 400+30*$PNo; }
 
-$Max+=(10 - $Max % 10);
-$Max=int($Max);
+$Max += (10 - $Max % 10);
+$Max = int($Max);
 
-my $MyGraph = GD::Graph::bars3d->new($Range, 400);
+my $MyGraph = GD::Graph::bars->new($Range, 400);
 
 $MyGraph->set( 
     x_label         => 'Problems #',