--- loncom/interface/lonstatistics.pm	2004/06/04 21:42:18	1.103
+++ loncom/interface/lonstatistics.pm	2004/06/15 14:22:45	1.104
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstatistics.pm,v 1.103 2004/06/04 21:42:18 matthew Exp $
+# $Id: lonstatistics.pm,v 1.104 2004/06/15 14:22:45 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -77,6 +77,7 @@ use Apache::lonproblemstatistics();
 use Apache::lonstudentassessment();
 use Apache::lonpercentage;
 use Apache::lonstudentsubmissions();
+use Apache::lonsurveyreports();
 
 #######################################################
 #######################################################
@@ -1055,6 +1056,11 @@ sub CreateMainMenu {
                      short_description => 
     &mt('Prepare Excel spreadsheets of student submissions.'),
                  },
+                   { internal_name => 'survey_reports',
+                     name => &mt('Survey Reports'),
+                     short_description => 
+    &mt('Prepare reports on survey results.'),
+                 },
                    { internal_name => 'correct_problems_plot',
                      name => &mt('Correct Problems Plot'),
                      short_description => 
@@ -1200,6 +1206,12 @@ sub handler {
                   '/adm/statistics?reportselected=student_submission_reports',
                   text=>'Student Submission Reports'});
             &Apache::lonstudentsubmissions::BuildStudentSubmissionsPage($r,$c);
+        } elsif($GoToPage eq 'survey_reports') {
+            &Apache::lonhtmlcommon::add_breadcrumb
+                ({href=>
+                  '/adm/statistics?reportselected=survey_reports',
+                  text=>'Survey Reports'});
+            &Apache::lonsurveyreports::BuildSurveyReportsPage($r,$c);
         } elsif($GoToPage eq 'correct_problems_plot') {
             &Apache::lonhtmlcommon::add_breadcrumb
                 ({href=>'/adm/statistics?reportselected=correct_problems_plot',