loncom/interface/lonblockingmenu.pm - diff

Return to lonblockingmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.4, 2012/03/31 14:15:24	version 1.5, 2012/04/04 21:04:56
Line 754 sub blockstore {	Line 754 sub blockstore {
if ($blockdocs) {	if ($blockdocs) {
&check_release_required('docs');	&check_release_required('docs');
}	}
	if (ref($blocktypes) eq 'HASH') {
	if ($blocktypes->{'printout'} eq 'on') {
	&check_release_required('printout');
	}
	}
if (exists($removals{$key})) {	if (exists($removals{$key})) {
$modtotal ++;	$modtotal ++;
} else {	} else {
Line 1471 sub blocktype_text {	Line 1476 sub blocktype_text {
'port' => 'Portfolio',	'port' => 'Portfolio',
'groups' => 'Groups',	'groups' => 'Groups',
'blogs' => 'Blogs',	'blogs' => 'Blogs',
'docs' => 'Content',	'docs' => 'Content',
	'printout' => 'Printouts',
);	);
my $typeorder = ['com','chat','boards','port','groups','blogs','docs'];	my $typeorder = ['com','chat','boards','port','groups','blogs','printout','docs'];
return ($typeorder,\%types);	return ($typeorder,\%types);
}	}