[LON-CAPA-cvs] cvs: loncom /cgi graph.gif
minaeibi
lon-capa-cvs@mail.lon-capa.org
Sun, 19 May 2002 15:47:25 -0000
minaeibi Sun May 19 11:47:25 2002 EDT
Modified files:
/loncom/cgi graph.gif
Log:
Revised the size and color of the graphs
Index: loncom/cgi/graph.gif
diff -u loncom/cgi/graph.gif:1.12 loncom/cgi/graph.gif:1.13
--- loncom/cgi/graph.gif:1.12 Wed May 15 21:31:23 2002
+++ loncom/cgi/graph.gif Sun May 19 11:47:25 2002
@@ -1,6 +1,6 @@
#!/usr/bin/perl
#
-# $Id: graph.gif,v 1.12 2002/05/16 01:31:23 minaeibi Exp $
+# $Id: graph.gif,v 1.13 2002/05/19 15:47:25 minaeibi Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -29,7 +29,7 @@
# YEAR=2001
# 9/13/01, 9/25/01, 10/6/01, 10/9/01, 12/25/01
# YEAR=2002
-# 2/1/02, 5/13/02,
+# 2/1/, 5/13, 5/15
# A CGI script that dynamically outputs a graphical chart for lonstatistics.
#
####
@@ -50,7 +50,7 @@
$xlabels[$nIdx]=$nIdx+1;
}
-#my $bg = (defined(@data2)) ? 'lorange' : 'white';
+
my @data =(\@xlabels,\@data11,\@data12);
@@ -84,7 +84,7 @@
# y_tick_number => $ytic,
y_label_skip => 1,
- dclrs => [ qw( green dgreen lyellow lpurple cyan lorange)],
+ dclrs => [ qw( lgreen dgreen lyellow lpurple cyan lorange)],
bar_spacing => 10,
cumulate => 2,
@@ -93,7 +93,7 @@
# legend_placement => 'RT',
fgclr => 'black',
- boxclr => 'lorange',
+ boxclr => 'white',
accentclr => 'dblue',
valuesclr => '#ffff77',
l_margin => 10,