version 1.125, 2002/10/24 14:34:07
|
version 1.126, 2002/10/24 15:30:25
|
Line 1042 sub setconstants {
|
Line 1042 sub setconstants {
|
$constants = \%tmp; |
$constants = \%tmp; |
} |
} |
$sheet->{'constants'} = $constants; |
$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'}}; |
return %{$sheet->{'safe'}->varglob('c')}=%{$sheet->{'constants'}}; |
} |
} |
|
|
Line 1631 sub format_rowlabel {
|
Line 1626 sub format_rowlabel {
|
if ($ENV{'form.showcsv'}) { |
if ($ENV{'form.showcsv'}) { |
$result = $title; |
$result = $title; |
} else { |
} else { |
$result = '<a href="/adm/assesscalc?usmb='.$symb. |
$result = '<a href="/adm/assesscalc?usymb='.$symb. |
'&uname='.$uname.'&udom='.$udom.'">'.$title.'</a>'; |
'&uname='.$uname.'&udom='.$udom.'">'.$title.'</a>'; |
} |
} |
} elsif ($type eq 'student') { |
} elsif ($type eq 'student') { |