--- loncom/interface/lonblockingmenu.pm 2020/08/10 19:28:21 1.27 +++ loncom/interface/lonblockingmenu.pm 2024/12/31 19:28:29 1.32 @@ -2,7 +2,7 @@ # Routines for configuring blocking of access to collaborative functions, # and specific resources during an exam # -# $Id: lonblockingmenu.pm,v 1.27 2020/08/10 19:28:21 raeburn Exp $ +# $Id: lonblockingmenu.pm,v 1.32 2024/12/31 19:28:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -527,7 +527,8 @@ sub handler { $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); } @@ -618,9 +619,11 @@ sub handler { ''. @@ -988,8 +991,7 @@ sub update_releasereq { } $modified_courses = []; } - undef($registered_cleanup); - return; + return OK; } sub get_dates_from_form { @@ -1654,14 +1656,17 @@ sub blocktype_text { 'port' => 'Portfolio', 'groups' => 'Groups', 'blogs' => 'Blogs', + 'about' => 'User Information', 'docs' => 'Content', 'printout' => 'Printouts', 'passwd' => 'Change Password', 'grades' => 'Gradebook', + 'search' => 'Content Search', + 'index' => 'Content Index', 'alert' => 'Critical Alert', 'reinit' => 'Course Re-init', ); - my $typeorder = ['com','chat','boards','port','groups','blogs','printout','docs','grades','alert','reinit','passwd']; + my $typeorder = ['com','chat','boards','port','groups','blogs','about','printout','docs','grades','search','index','alert','reinit','passwd']; return ($typeorder,\%types); }