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

matthew lon-capa-cvs@mail.lon-capa.org
Thu, 24 Oct 2002 15:30:25 -0000


matthew		Thu Oct 24 11:30:25 2002 EDT

  Modified files:              
    /loncom/interface	lonspreadsheet.pm 
  Log:
  The bug mentioned in previous commit was due to passing 'usmb' instead of
  'usymb' from the student sheet to get to the assessment sheet.  Fixed.
  
  
Index: loncom/interface/lonspreadsheet.pm
diff -u loncom/interface/lonspreadsheet.pm:1.125 loncom/interface/lonspreadsheet.pm:1.126
--- loncom/interface/lonspreadsheet.pm:1.125	Thu Oct 24 10:34:07 2002
+++ loncom/interface/lonspreadsheet.pm	Thu Oct 24 11:30:25 2002
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.125 2002/10/24 14:34:07 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.126 2002/10/24 15:30:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1042,11 +1042,6 @@
         $constants = \%tmp;
     }
     $sheet->{'constants'} = $constants;
-    &Apache::lonnet::logthis("----------------------------------");
-    foreach my $c (keys(%{$sheet->{'constants'}})) {
-        &Apache::lonnet::logthis('constant '.$c.' = '.
-                                 $sheet->{'constants'}->{$c});
-    }
     return %{$sheet->{'safe'}->varglob('c')}=%{$sheet->{'constants'}};
 }
 
@@ -1631,7 +1626,7 @@
         if ($ENV{'form.showcsv'}) {
             $result = $title;
         } else {
-            $result = '<a href="/adm/assesscalc?usmb='.$symb.
+            $result = '<a href="/adm/assesscalc?usymb='.$symb.
                 '&uname='.$uname.'&udom='.$udom.'">'.$title.'</a>';
         }
     } elsif ($type eq 'student') {