[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') {