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

[raeburn]

raeburn		Sun Dec 15 02:22:53 2024 EDT

  Modified files:              
    /loncom/interface	londocs.pm lonblockingmenu.pm 
  Log:
  - Args for create_picker() changed in loncourserespicker rev. 1.19
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.710 loncom/interface/londocs.pm:1.711
--- loncom/interface/londocs.pm:1.710	Fri Jun  7 14:37:55 2024
+++ loncom/interface/londocs.pm	Sun Dec 15 02:22:53 2024
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.710 2024/06/07 14:37:55 raeburn Exp $
+# $Id: londocs.pm,v 1.711 2024/12/15 02:22:53 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5402,7 +5402,7 @@
         }
         my %currtiny = &Apache::lonnet::dump('tiny',$cdom,$cnum);
         $r->print(&Apache::loncourserespicker::create_picker($navmap,'shorturls',$formname,$crstype,undef,
-                                                             undef,undef,undef,undef,undef,\%currtiny,$readonly));
+                                                             undef,undef,undef,undef,undef,\%currtiny,undef,$readonly));
     }
     $r->print(&endContentScreen());
 }
Index: loncom/interface/lonblockingmenu.pm
diff -u loncom/interface/lonblockingmenu.pm:1.29 loncom/interface/lonblockingmenu.pm:1.30
--- loncom/interface/lonblockingmenu.pm:1.29	Sat Jan  2 21:07:36 2021
+++ loncom/interface/lonblockingmenu.pm	Sun Dec 15 02:22:53 2024
@@ -2,7 +2,7 @@
 # Routines for configuring blocking of access to collaborative functions, 
 # and specific resources during an exam
 #
-# $Id: lonblockingmenu.pm,v 1.29 2021/01/02 21:07:36 raeburn Exp $
+# $Id: lonblockingmenu.pm,v 1.30 2024/12/15 02:22:53 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -527,7 +527,8 @@
             $r->print(&Apache::loncourserespicker::create_picker($navmap,
                                      'examblock','resourceblocks',$crstype,
                                      \%blockedmaps,\%blockedresources,
-                                     $env{'form.block'},'','',undef,undef,$readonly));
+                                     $env{'form.block'},'','',undef,undef,undef,
+                                     $readonly));
         } else {
             $r->print($errormsg);
         }