--- loncom/interface/Attic/lonspreadsheet.pm 2002/10/24 14:34:07 1.125
+++ loncom/interface/Attic/lonspreadsheet.pm 2002/10/24 15:34:10 1.127
@@ -1,5 +1,5 @@
#
-# $Id: lonspreadsheet.pm,v 1.125 2002/10/24 14:34:07 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.127 2002/10/24 15:34:10 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1042,11 +1042,6 @@ sub setconstants {
$constants = \%tmp;
}
$sheet->{'constants'} = $constants;
- &Apache::lonnet::logthis("----------------------------------");
- foreach my $c (keys(%{$sheet->{'constants'}})) {
- &Apache::lonnet::logthis('constant '.$c.' = '.
- $sheet->{'constants'}->{$c});
- }
return %{$sheet->{'safe'}->varglob('c')}=%{$sheet->{'constants'}};
}
@@ -1631,7 +1626,7 @@ sub format_rowlabel {
if ($ENV{'form.showcsv'}) {
$result = $title;
} else {
- $result = ''.$title.'';
}
} elsif ($type eq 'student') {
@@ -1646,10 +1641,9 @@ sub format_rowlabel {
}
} elsif ($type eq 'parameter') {
if ($ENV{'form.showcsv'}) {
- $result = $labeldata =~ s/
//g;
- } else {
- $result = $labeldata;
+ $labeldata =~ s/
/ /g;
}
+ $result = $labeldata;
} else {
&Apache::lonnet::logthis("lonspreadsheet:bogus rowlabel type: $type");
}