--- loncom/interface/statistics/lonsubmissiontimeanalysis.pm	2003/12/18 16:36:12	1.6
+++ loncom/interface/statistics/lonsubmissiontimeanalysis.pm	2004/01/08 19:20:12	1.9
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonsubmissiontimeanalysis.pm,v 1.6 2003/12/18 16:36:12 matthew Exp $
+# $Id: lonsubmissiontimeanalysis.pm,v 1.9 2004/01/08 19:20:12 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -171,12 +171,12 @@ sub analyze_times {
     my $SubData = &Apache::loncoursedata::get_response_time_data
         ($students,$resource->{'symb'},$part);
     if (! defined($SubData) || ! ref($SubData)) {
-        $html.= '<h2>There is no submission data for this resource</h2>';
+        $html.= '<h2>There is no submission data for this problem</h2>';
         return $html;
     }
     my $NumSub = scalar(@{$SubData});
     if (! @{$SubData}) {
-        $html.= '<h2>There is no submission data for this resource</h2>';
+        $html.= '<h2>There is no submission data for this problem</h2>';
         return $html;
     }
     # Process the data
@@ -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,9 +269,12 @@ sub analyze_times {
                                               (xskip => $bins_per_day,
                                                x_ticks => $bins_per_day,
                                                x_tick_offset => $bins_per_day,
-                                               width => 50+2*$bincount,
-                                               y1_label=>'Number of Submissions per hour',
-                                               y2_label=>'Percent of Students answering Correctly')
+                                               width => $width,
+                      y1_label=>'Number of Submissions per hour',
+                      y2_label=>'Percent of Students answering Correctly',
+                     'data.1.label'=>'Submissions per hour',
+                     'data.2.label'=>'Percent correct',
+                                               )
                                               );
     $html .= '<br />';
     return $html;