--- loncom/interface/spreadsheet/studentcalc.pm	2003/09/08 18:25:26	1.19
+++ loncom/interface/spreadsheet/studentcalc.pm	2003/09/16 15:39:36	1.21
@@ -1,5 +1,5 @@
 #
-# $Id: studentcalc.pm,v 1.19 2003/09/08 18:25:26 matthew Exp $
+# $Id: studentcalc.pm,v 1.21 2003/09/16 15:39:36 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -141,11 +141,7 @@ sub get_html_title {
 
 sub parent_link {
     my $self = shift;
-    my $link .= '<p><a href="/adm/classcalc?'.
-        'sname='.$self->{'name'}.
-            '&sdomain='.$self->{'domain'}.'">'.
-                'Course level sheet</a></p>'."\n";
-    return $link;
+    return '<p><a href="/adm/classcalc">Course level sheet</a></p>'."\n";
 }
 
 sub convenience_links {
@@ -589,6 +585,8 @@ Writes the export data for this student
 #############################################
 sub save_export_data {
     my $self = shift;
+    &Apache::assesscalc::save_cached_export_rows($self->{'name'},
+                                                 $self->{'domain'});
     return if ($self->temporary());
     my $student = $self->{'name'}.':'.$self->{'domain'};
     return if (! exists($Exportrows{$student}));