--- loncom/interface/statistics/lonsubmissiontimeanalysis.pm	2004/01/08 15:51:16	1.7
+++ loncom/interface/statistics/lonsubmissiontimeanalysis.pm	2004/01/08 19:18:50	1.8
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonsubmissiontimeanalysis.pm,v 1.7 2004/01/08 15:51:16 matthew Exp $
+# $Id: lonsubmissiontimeanalysis.pm,v 1.8 2004/01/08 19:18:50 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -253,6 +253,10 @@ sub analyze_times {
     (undef,undef,undef,$mday,$month,$year,$wday) = localtime($endtime);
     $xlabel .= $FullWeekDay[$wday].' '.
         join(' ',($Month[$month],$mday,1900+$year));
+    my $width = 50+2*$bincount;
+    if ($width < 250) {
+        $width = 250;
+    }
     $html .= &Apache::loncommon::DrawXYYGraph($title,
                                               $xlabel,
                                               'Submissions vs Time',
@@ -265,7 +269,7 @@ sub analyze_times {
                                               (xskip => $bins_per_day,
                                                x_ticks => $bins_per_day,
                                                x_tick_offset => $bins_per_day,
-                                               width => 50+2*$bincount,
+                                               width => $width,
                       y1_label=>'Number of Submissions per hour',
                       y2_label=>'Percent of Students answering Correctly',
                      'data.1.label'=>'Submissions per hour',