--- loncom/interface/Attic/lonspreadsheet.pm 2002/12/13 19:11:00 1.159 +++ loncom/interface/Attic/lonspreadsheet.pm 2003/01/13 14:58:28 1.161 @@ -1,5 +1,5 @@ # -# $Id: lonspreadsheet.pm,v 1.159 2002/12/13 19:11:00 matthew Exp $ +# $Id: lonspreadsheet.pm,v 1.161 2003/01/13 14:58:28 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2391,7 +2391,7 @@ sub updatestudentassesssheet { unless ((exists($sheet->{'rowlabel'}->{$usy}) && (defined($sheet->{'rowlabel'}->{$usy})) || (!$1) || ($formula =~ /^(~~~|---)/) )) { - $f{$_}='!!! Obsolete'; + $f{$cell}='!!! Obsolete'; $changed=1; } } @@ -2563,11 +2563,6 @@ sub loadassessment { # restore individual # %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