--- loncom/interface/spreadsheet/classcalc.pm	2003/05/29 13:39:38	1.6
+++ loncom/interface/spreadsheet/classcalc.pm	2003/06/23 16:06:11	1.9
@@ -1,5 +1,5 @@
 #
-# $Id: classcalc.pm,v 1.6 2003/05/29 13:39:38 matthew Exp $
+# $Id: classcalc.pm,v 1.9 2003/06/23 16:06:11 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -175,8 +175,8 @@ END
             '&sdomain='.$student->{'domain'}.'">';
         $student->{'section'} = 'none' if ($student->{'section'} eq '-1');
 	$r->print('<tr>'.'<td>'.$rownum.'</td>'.
-		  '<td>'.$link.$student->{'fullname'}.'</a></td>'.
-		  '<td>'.$student->{'username'}.'</td>'.
+		  '<td>'.$student->{'fullname'}.'</td>'.
+		  '<td>'.$link.$student->{'username'}.'</a></td>'.
 		  '<td>'.$student->{'domain'}  .'</td>'.
 		  '<td>'.$student->{'section'} .'</td>'.
 		  '<td>'.$student->{'status'}  .'</td>'.
@@ -256,7 +256,11 @@ sub compute {
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
         ($r,'Spreadsheet Computation Status',
          'Spreadsheet Computation', scalar(@Students));
+    &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,
+                                          'Processing course structure');
     &Apache::studentcalc::initialize_package();
+    &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,
+                                          'Processing first student');
     foreach my $student (@Students) {
         my $sname = $student->{'username'}.':'.$student->{'domain'};
 	my $studentsheet = Apache::studentcalc->new
@@ -282,6 +286,7 @@ sub compute {
     $self->constants(\%c);
     $self->formulas(\%f);
     $self->calcsheet();
+    $self->save() if ($self->need_to_save());
 }
 
 1;