--- loncom/interface/Attic/lonspreadsheet.pm 2001/01/02 22:58:46 1.31 +++ loncom/interface/Attic/lonspreadsheet.pm 2001/01/02 23:27:11 1.32 @@ -1191,12 +1191,13 @@ sub loadcourse { my $row=$1; unless (($f{$_}=~/^\!/) -|| ($row>25)) +|| ($row>200)) { my @studentdata=&exportsheet(&getuname($safeeval), &getudom($safeeval), 'studentcalc'); + undef %userrdatas; my $index=0; map { if ($studentdata[$index]) { @@ -1260,7 +1261,7 @@ sub loadassessment { unless ($uhome eq 'no_host') { # -------------------------------------------------------------- Get coursedata unless - ((time-$courserdatas{$cid.'.last_cache'})<120) { + ((time-$courserdatas{$cid.'.last_cache'})<240) { my $reply=&Apache::lonnet::reply('dump:'.$cdom.':'.$cnum. ':resourcedata',$chome); if ($reply!~/^error\:/) { @@ -1275,7 +1276,7 @@ sub loadassessment { } split(/\&/,$courserdatas{$ENV{'request.course.id'}}); # --------------------------------------------------- Get userdata (if present) unless - ((time-$userrdatas{$uname.'___'.$udom.'.last_cache'})<120) { + ((time-$userrdatas{$uname.'___'.$udom.'.last_cache'})<240) { my $reply= &Apache::lonnet::reply('dump:'.$udom.':'.$uname.':resourcedata',$uhome); if ($reply!~/^error\:/) {