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

albertel lon-capa-cvs@mail.lon-capa.org
Mon, 18 Oct 2004 18:08:54 -0000


albertel		Mon Oct 18 14:08:54 2004 EDT

  Modified files:              
    /loncom/homework	lonhomework.pm 
  Log:
  - if they hit stop, stop
  
  
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.181 loncom/homework/lonhomework.pm:1.182
--- loncom/homework/lonhomework.pm:1.181	Wed Sep 29 02:51:25 2004
+++ loncom/homework/lonhomework.pm	Mon Oct 18 14:08:54 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.181 2004/09/29 06:51:25 albertel Exp $
+# $Id: lonhomework.pm,v 1.182 2004/10/18 18:08:54 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -489,6 +489,7 @@
     for(my $i=1;$i<$ENV{'form.numtoanalyze'}+1;$i++) {
 	&Apache::lonhtmlcommon::Increment_PrgWin($request,\%prog_state,
 						 &mt('last problem'));
+	if (&Apache::loncommon::connection_aborted($request)) { return; }
 	my $subresult=&Apache::lonnet::ssi($request->uri,
 					   ('grade_target' => 'analyze'),
 					   ('rndseed' => $i+$rndseed));