version 1.159, 2002/12/13 19:11:00
|
version 1.161, 2003/01/13 14:58:28
|
Line 2391 sub updatestudentassesssheet {
|
Line 2391 sub updatestudentassesssheet {
|
unless ((exists($sheet->{'rowlabel'}->{$usy}) && |
unless ((exists($sheet->{'rowlabel'}->{$usy}) && |
(defined($sheet->{'rowlabel'}->{$usy})) || (!$1) || |
(defined($sheet->{'rowlabel'}->{$usy})) || (!$1) || |
($formula =~ /^(~~~|---)/) )) { |
($formula =~ /^(~~~|---)/) )) { |
$f{$_}='!!! Obsolete'; |
$f{$cell}='!!! Obsolete'; |
$changed=1; |
$changed=1; |
} |
} |
} |
} |
Line 2563 sub loadassessment {
|
Line 2563 sub loadassessment {
|
# restore individual |
# restore individual |
# |
# |
%returnhash = &Apache::lonnet::restore($symb,$namespace,$udom,$uname); |
%returnhash = &Apache::lonnet::restore($symb,$namespace,$udom,$uname); |
for (my $version=1;$version<=$returnhash{'version'};$version++) { |
|
foreach (split(/\:/,$returnhash{$version.':keys'})) { |
|
$returnhash{$_}=$returnhash{$version.':'.$_}; |
|
} |
|
} |
|
} |
} |
# |
# |
# returnhash now has all stores for this resource |
# returnhash now has all stores for this resource |