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

raeburn raeburn at source.lon-capa.org
Fri Jan 17 10:05:47 EST 2025


raeburn		Fri Jan 17 15:05:47 2025 EDT

  Modified files:              
    /loncom/homework	lonhomework.pm 
  Log:
  - Sanity checking
  
  
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.393 loncom/homework/lonhomework.pm:1.394
--- loncom/homework/lonhomework.pm:1.393	Sun Jan  5 22:42:44 2025
+++ loncom/homework/lonhomework.pm	Fri Jan 17 15:05:47 2025
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.393 2025/01/05 22:42:44 raeburn Exp $
+# $Id: lonhomework.pm,v 1.394 2025/01/17 15:05:47 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2133,13 +2133,15 @@
         my $iterator;
         if ($mapurl ne '') {
             my $map = $navmap->getResourceByUrl($mapurl);
-            my $firstres = $map->map_start();
-            my $finishres = $map->map_finish();
-            my $recursive = 1;
-            if ($pbscope eq 'nonrec') {
-                $recursive = 0;
+            if (ref($map)) {
+                my $firstres = $map->map_start();
+                my $finishres = $map->map_finish();
+                my $recursive = 1;
+                if ($pbscope eq 'nonrec') {
+                    $recursive = 0;
+                }
+                $iterator = $navmap->getIterator($firstres,$finishres,undef,$recursive);
             }
-            $iterator = $navmap->getIterator($firstres,$finishres,undef,$recursive);
         } else {
             $iterator = $navmap->getIterator(undef,undef,undef,1);
         }




More information about the LON-CAPA-cvs mailing list