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

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 12 Jun 2003 20:11:07 -0000


albertel		Thu Jun 12 16:11:07 2003 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - don't need ctr anymore 
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.94 loncom/homework/grades.pm:1.95
--- loncom/homework/grades.pm:1.94	Thu Jun 12 15:56:13 2003
+++ loncom/homework/grades.pm	Thu Jun 12 16:11:07 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.94 2003/06/12 19:56:13 bowersj2 Exp $
+# $Id: grades.pm,v 1.95 2003/06/12 20:11:07 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2590,14 +2590,13 @@
 	    $mapiterator->next(); # skip the first BEGIN_MAP
 	    my $mapcurRes = $mapiterator->next(); # for "current resource"
 	    my $ctr=0;
-	    while ($mapdepth > 0 && $ctr < 100) {
+	    while ($mapdepth > 0) {
 		if($mapcurRes == $mapiterator->BEGIN_MAP) { $mapdepth++; }
 		if($mapcurRes == $mapiterator->END_MAP) { $mapdepth++; }
 
 		if (ref($mapcurRes) && $mapcurRes->is_problem() && !$mapcurRes->randomout) {
 		    $countProblems++;
 		}
-		$ctr++;
 		$mapcurRes = $mapiterator->next();
 	    }
 	    if ($countProblems > 0) {