--- loncom/interface/spreadsheet/studentcalc.pm 2003/09/05 01:57:54 1.18
+++ loncom/interface/spreadsheet/studentcalc.pm 2003/09/16 15:39:36 1.21
@@ -1,5 +1,5 @@
#
-# $Id: studentcalc.pm,v 1.18 2003/09/05 01:57:54 matthew Exp $
+# $Id: studentcalc.pm,v 1.21 2003/09/16 15:39:36 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -129,7 +129,7 @@ sub get_html_title {
my $title = '
'.$name;
if ($ENV{'user.name'} ne $self->{'name'} &&
$ENV{'user.domain'} ne $self->{'domain'}) {
- $title .= &Apache::loncommon::aboutmewrapper
+ $title .= ' '.&Apache::loncommon::aboutmewrapper
($self->{'name'}.'@'.$self->{'domain'},
$self->{'name'},$self->{'domain'});
}
@@ -141,11 +141,7 @@ sub get_html_title {
sub parent_link {
my $self = shift;
- my $link .= '
'.
- 'Course level sheet
'."\n";
- return $link;
+ return 'Course level sheet
'."\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}));