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

matthew lon-capa-cvs@mail.lon-capa.org
Thu, 01 Apr 2004 18:49:40 -0000


matthew		Thu Apr  1 13:49:40 2004 EDT

  Modified files:              
    /loncom/interface	lonstatistics.pm 
    /loncom/interface/statistics	lonstudentassessment.pm 
  Log:
  Bug 2895: Sorting the classlist lead to a blank page.  Should go in 
  version_1_1_X.
  
  
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.100 loncom/interface/lonstatistics.pm:1.101
--- loncom/interface/lonstatistics.pm:1.100	Mon Mar  1 11:39:19 2004
+++ loncom/interface/lonstatistics.pm	Thu Apr  1 13:49:39 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstatistics.pm,v 1.100 2004/03/01 16:39:19 matthew Exp $
+# $Id: lonstatistics.pm,v 1.101 2004/04/01 18:49:39 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -971,7 +971,10 @@
     $Str .= '<table border="0"><tr><td bgcolor="#777777">'."\n";
     $Str .= '<table border="0" cellpadding="3"><tr bgcolor="#e6ffff">'."\n";
     foreach my $field (@Fields) {
-        $Str .= '<th><a href="/adm/statistics?reportSelected=classlist&sort='.$field.'">'.$field.
+        $Str .= '<th><a href="/adm/statistics?'.
+            'reportSelected=student_assessment&'.
+            'selectstudent=1&'.
+            'sort='.$field.'">'.$field.
             '</a></th>';
     }
     $Str .= '</tr>'."\n";
Index: loncom/interface/statistics/lonstudentassessment.pm
diff -u loncom/interface/statistics/lonstudentassessment.pm:1.99 loncom/interface/statistics/lonstudentassessment.pm:1.100
--- loncom/interface/statistics/lonstudentassessment.pm:1.99	Wed Mar 31 14:34:10 2004
+++ loncom/interface/statistics/lonstudentassessment.pm	Thu Apr  1 13:49:39 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.99 2004/03/31 19:34:10 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.100 2004/04/01 18:49:39 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -153,6 +153,8 @@
     #
     $single_student_mode = 0;
     $single_student_mode = 1 if ($ENV{'form.SelectedStudent'});
+    &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
+                                            ['selectstudent']);
     if ($ENV{'form.selectstudent'}) {
         &Apache::lonstatistics::DisplayClasslist($r);
         return;