[LON-CAPA-cvs] cvs: loncom /homework lonhomework.pm

[albertel]

albertel		Tue May 25 17:25:54 2004 EDT

  Modified files:              
    /loncom/homework	lonhomework.pm 
  Log:
  - inline the progress window
  
  
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.174 loncom/homework/lonhomework.pm:1.175
--- loncom/homework/lonhomework.pm:1.174	Sat Apr 17 10:06:41 2004
+++ loncom/homework/lonhomework.pm	Tue May 25 17:25:53 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.174 2004/04/17 14:06:41 www Exp $
+# $Id: lonhomework.pm,v 1.175 2004/05/25 21:25:53 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -440,7 +440,6 @@
             <hr />
             <input type="submit" name="submit" value="'.&mt("View").'" />
             <hr />
-            '.&mt('List of possible answers').':
             </form>';
     &Apache::lonxml::add_messages(\$result);
     $request->print($result);
@@ -465,7 +464,8 @@
     my %prog_state=
 	&Apache::lonhtmlcommon::Create_PrgWin($request,&mt('Analyze Progress'),
 					      &mt('Getting Problem Variants'),
-					      $ENV{'form.numtoanalyze'});
+					      $ENV{'form.numtoanalyze'},
+					      'inline',undef);
     for(my $i=1;$i<$ENV{'form.numtoanalyze'}+1;$i++) {
 	&Apache::lonhtmlcommon::Increment_PrgWin($request,\%prog_state,
 						 &mt('last problem'));
@@ -490,6 +490,7 @@
     }
     &Apache::lonhtmlcommon::Update_PrgWin($request,\%prog_state,
 					  &mt('Analyzing Results'));
+    $request->print('<hr />'.&mt('List of possible answers').': ');
     foreach my $part (sort(keys(%allparts))) {
 	if (defined(@{ $overall{$part.'.answer'} })) {
 	    my $num_cols=scalar(@{ $overall{$part.'.answer'}->[0] });