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

[bowersj2]

bowersj2		Wed Jul 16 15:22:49 2003 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  A couple of bugs found during testing; retrieveResources needed a continue,
  and recursive needs to be passed through correctly to work.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.214 loncom/interface/lonnavmaps.pm:1.215
--- loncom/interface/lonnavmaps.pm:1.214	Mon Jul 14 15:13:38 2003
+++ loncom/interface/lonnavmaps.pm	Wed Jul 16 15:22:49 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.214 2003/07/14 19:13:38 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.215 2003/07/16 19:22:49 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2094,7 +2094,7 @@
 
     # Get an iterator.
     my $it = $self->getIterator($map->map_start(), $map->map_finish(),
-                                !$recursive);
+                                undef, $recursive);
 
     my @resources = ();
 
@@ -2123,6 +2123,7 @@
             }
         }
 
+    } continue {
         $curRes = $it->next();
     }