--- loncom/interface/spreadsheet/Spreadsheet.pm	2003/06/18 17:35:14	1.14
+++ loncom/interface/spreadsheet/Spreadsheet.pm	2003/06/20 16:14:30	1.16
@@ -1,5 +1,5 @@
 #
-# $Id: Spreadsheet.pm,v 1.14 2003/06/18 17:35:14 matthew Exp $
+# $Id: Spreadsheet.pm,v 1.16 2003/06/20 16:14:30 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1531,9 +1531,6 @@ sub load {
             } else {
                 $self->filename($newfilename);
             }
-        } elsif ($filename =~ /^default\.$self->{'type'}/) {
-            # if there is an Original_$stype, load it instead
-            $formulas = $self->load_system_default_sheet();
         } else {
             # Load the spreadsheet definition file from the save file
             my %tmphash = &Apache::lonnet::dump($filename,$cdom,$cnum);
@@ -1621,6 +1618,9 @@ sub save {
         } 
         if ($self->is_default()) {
             &Apache::lonnet::expirespread('','',$self->{'type'},'');
+            if ($self->{'type'} eq 'assesscalc') {
+                &Apache::lonnet::expirespread('','','studentcalc','');
+            }
         }
         return $reply;
     }