![[BACK]](/cgi-bin/cvsweb.cgi/loncom/cgi/graph.png?sortby=author;f=h#rev1.10){kind=small}
Return to graph.png CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / cgi|
Return to graph.png CVS log | Up to [LON-CAPA] / loncom / cgi |
| version 1.9, 2002/02/01 11:47:34 | version 1.10, 2002/02/02 11:06:00 |
|---|---|
| Line 54 my $Range; | Line 54 my $Range; |
| if ( $PNo > 10 ) {$Range = 30*$PNo;} | if ( $PNo > 10 ) {$Range = 30*$PNo;} |
| else { $Range = 400+30*$PNo; } | else { $Range = 400+30*$PNo; } |
| $Max += (10 - $Max % 10); | if ( $Max > 1 ) { |
| $Max = int($Max); | $Max += (10 - $Max % 10); |
| $Max = int($Max); | |
| } | |
| else { $Max = 1; } | |
| my $MyGraph = GD::Graph::bars->new($Range, 400); | my $MyGraph = GD::Graph::bars->new($Range, 400); |
