version 1.77, 2002/11/19 19:20:50
|
version 1.78, 2002/11/19 19:26:35
|
Line 1380 sub crsenv {
|
Line 1380 sub crsenv {
|
if ($name =~ /^spreadsheet_default_(classcalc| |
if ($name =~ /^spreadsheet_default_(classcalc| |
studentcalc| |
studentcalc| |
assesscalc)$/x) { |
assesscalc)$/x) { |
my $sheettype = $1; |
my $sheettype = $1; |
if ($sheettype eq 'classcalc') { |
if ($sheettype eq 'classcalc') { |
# no need to do anything since viewing the sheet will |
# no need to do anything since viewing the sheet will |
# cause it to be updated. |
# cause it to be updated. |
} elsif ($sheettype eq 'studentcalc') { |
} elsif ($sheettype eq 'studentcalc') { |
# expire all the student spreadsheets |
# expire all the student spreadsheets |
&Apache::lonnet::expirespread('','','studentcalc'); |
&Apache::lonnet::expirespread('','','studentcalc'); |
} else { |
} else { |
# expire all the default assessment spreadsheets |
# expire all the default assessment spreadsheets |
# ACK! No way to do this currently!!!!! Bummer! |
|
} |
} |
} |
} |
|
|