[LON-CAPA-cvs] cvs: loncom /interface/spreadsheet classcalc.pm

matthew lon-capa-cvs@mail.lon-capa.org
Fri, 04 Jun 2004 21:43:36 -0000


matthew		Fri Jun  4 17:43:36 2004 EDT

  Modified files:              
    /loncom/interface/spreadsheet	classcalc.pm 
  Log:
  Initialize student spreadsheet package before creating progress window.
  
  
Index: loncom/interface/spreadsheet/classcalc.pm
diff -u loncom/interface/spreadsheet/classcalc.pm:1.19 loncom/interface/spreadsheet/classcalc.pm:1.20
--- loncom/interface/spreadsheet/classcalc.pm:1.19	Mon Apr 26 10:06:00 2004
+++ loncom/interface/spreadsheet/classcalc.pm	Fri Jun  4 17:43:36 2004
@@ -1,5 +1,5 @@
 #
-# $Id: classcalc.pm,v 1.19 2004/04/26 14:06:00 matthew Exp $
+# $Id: classcalc.pm,v 1.20 2004/06/04 21:43:36 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -376,13 +376,11 @@
     $self->initialize_safe_space();
     my %c = $self->constants();
     my %f = $self->formulas();
+    &Apache::studentcalc::initialize_package();
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
         ($r,&mt('Spreadsheet Computation Status'),
          &mt('Spreadsheet Computation'), scalar(@Students));
     &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,
-                                          &mt('Processing course structure'));
-    &Apache::studentcalc::initialize_package();
-    &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,
                                           &mt('Processing first student'));
     foreach my $student (@Students) {
         if ($connection->aborted()) { $self->cleanup(); return; }