--- loncom/interface/Attic/lonspreadsheet.pm	2003/01/30 21:35:13	1.167
+++ loncom/interface/Attic/lonspreadsheet.pm	2003/02/13 19:07:46	1.168
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.167 2003/01/30 21:35:13 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.168 2003/02/13 19:07:46 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1744,6 +1744,7 @@ sub calcsheet {
     $self->sett();
     my $result =  $self->{'safe'}->reval('&calc();');
     %{$self->{'values'}} = %{$self->{'safe'}->varglob('sheet_values')};
+#    $self->logthis($self->get_errorlog());
     return $result;
 }
 
@@ -2540,6 +2541,7 @@ sub export_sheet_as_excel {
             }
             next if ($row_is_empty);
         }
+        $worksheet->write($rows_output,$cols_output++,$rownum);
         $worksheet->write($rows_output,$cols_output++,$label);
         if (ref($label)) {
             $cols_output = (scalar(@$label));
@@ -3131,9 +3133,9 @@ sub loadstudent{
     my %formulas  = $self->formulas();
     $cachedassess = $self->{'uname'}.':'.$self->{'udom'};
     # Get ALL the student preformance data
-    my @tmp = &Apache::lonnet::currentdump($self->{'cid'},
+    my @tmp = &Apache::lonnet::currentdump($self->{'uname'},
                                            $self->{'udom'},
-                                           $self->{'uname'});
+                                           $self->{'cid'});
     if ((scalar @tmp > 0) && ($tmp[0] !~ /^error:/)) {
         %cachedstores = @tmp;
     }