![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.219, 2004/10/12 23:26:48 | version 1.220, 2004/10/15 16:51:29 |
|---|---|
| Line 3293 sub DrawBarGraph { | Line 3293 sub DrawBarGraph { |
| } | } |
| # | # |
| my ($height,$width,$xskip,$bar_width) = (200,120,1,15); | my ($height,$width,$xskip,$bar_width) = (200,120,1,15); |
| if ($NumBars < 10) { | if ($NumBars < 5) { |
| $width = 120+$NumBars*25; | |
| $xskip = 1; | |
| $bar_width = 25; | |
| } elsif ($NumBars < 10) { | |
| $width = 120+$NumBars*15; | $width = 120+$NumBars*15; |
| $xskip = 1; | $xskip = 1; |
| $bar_width = 15; | $bar_width = 15; |