loncom/interface/lonblockingmenu.pm - diff

Return to lonblockingmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.23, 2016/10/23 16:17:52	version 1.24, 2016/10/23 17:02:56
Line 658 END	Line 658 END
&Apache::loncourserespicker::get_navmap_object($crstype,'examblock');	&Apache::loncourserespicker::get_navmap_object($crstype,'examblock');

# --------------------------------------------- Interface for adding a new block	# --------------------------------------------- Interface for adding a new block
if ($readonly) {	unless ($readonly) {
if (!$blockcount) {
$r->print($lt{'ncbc'}.'<br />');
}
} else {
&display_addblocker_table($r,$blockcount,\%ltext,\%intervals,	&display_addblocker_table($r,$blockcount,\%ltext,\%intervals,
$navmap,$errormsg);	$navmap,$errormsg);
if ($blockcount > 0) {	if ($blockcount > 0) {
$r->print('</div>');	$r->print('</div>');
}	}
}	}

# ------------------------------------------------ Interface for existing blocks	# ------------------------------------------------ Interface for existing blocks
if ($blockcount > 0) {	if (!$blockcount) {
	if ($readonly) {
	$r->print($lt{'ncbc'}.'<br />');
	}
	} else {
&display_blocker_status($r,\%records,\%ltext,\%intervals,	&display_blocker_status($r,\%records,\%ltext,\%intervals,
$navmap,$errormsg,$blockcount,$readonly);	$navmap,$errormsg,$blockcount,$readonly);
}	}