[LON-CAPA-cvs] cvs: loncom /interface lonstatistics.pm

[matthew]

matthew		Wed Oct 29 10:22:31 2003 EDT

  Modified files:              
    /loncom/interface	lonstatistics.pm 
  Log:
  Provide access to lonsubmissiontimeanalysis.pm.
  
  
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.88 loncom/interface/lonstatistics.pm:1.89
--- loncom/interface/lonstatistics.pm:1.88	Thu Oct 23 11:12:45 2003
+++ loncom/interface/lonstatistics.pm	Wed Oct 29 10:22:30 2003
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstatistics.pm,v 1.88 2003/10/23 15:12:45 matthew Exp $
+# $Id: lonstatistics.pm,v 1.89 2003/10/29 15:22:30 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -48,6 +48,7 @@
     use Apache::loncoursedata;
     use Apache::lonhtmlcommon;
     use Apache::lonproblemanalysis;
+    use Apache::lonsubmissiontimeanalysis;
     use Apache::lonproblemstatistics;
     use Apache::lonstudentassessment;
     use Apache::lonpercentage;
@@ -79,6 +80,7 @@
 use Apache::loncoursedata;
 use Apache::lonhtmlcommon;
 use Apache::lonproblemanalysis();
+use Apache::lonsubmissiontimeanalysis();
 use Apache::lonproblemstatistics();
 use Apache::lonstudentassessment();
 use Apache::lonpercentage;
@@ -1048,6 +1050,11 @@
                      short_description => 
     &mt('Detailed statistics and graphs of student performance on problems.'),
                  },
+                   { internal_name => 'submissiontime_analysis',
+                     name => &mt('Submission Time Analysis'),
+                     short_description => 
+    &mt('Display and analysis of submission times on assessments.'),
+                 },
 #                   { internal_name => 'student_assessment',
 #                     name => &mt('Problem Status Chart'),
 #                     short_description => 
@@ -1169,6 +1176,8 @@
             &Apache::lonproblemstatistics::BuildProblemStatisticsPage($r,$c);
         } elsif($GoToPage eq 'problem_analysis') {
             &Apache::lonproblemanalysis::BuildProblemAnalysisPage($r,$c);
+        } elsif($GoToPage eq 'submissiontime_analysis') {
+            &Apache::lonsubmissiontimeanalysis::BuildSubmissionTimePage($r,$c);
         } elsif($GoToPage eq 'student_assessment') {
             &Apache::lonstudentassessment::BuildStudentAssessmentPage($r,$c);
         } elsif($GoToPage eq 'DoDiffGraph' || $GoToPage eq 'PercentWrongGraph') {