[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