loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.309.2.4, 2009/12/15 05:25:07	version 1.309.2.6, 2010/01/05 13:18:11
Line 296 sub gci_secondary_menu {	Line 296 sub gci_secondary_menu {
'managetest' => '/adm/menu',	'managetest' => '/adm/menu',
);	);
my $current = 'managetest';	my $current = 'managetest';
	if ($env{'form.destinationurl'} eq '/adm/gci_info') {
	undef($current);
	}
foreach my $key (keys(%courses)) {	foreach my $key (keys(%courses)) {
$links{$key} = "javascript:switchpage('$key');";	$links{$key} = "javascript:switchpage('$key');";
if ($env{'request.course.id'} eq $courses{$key}) {	if ($env{'request.course.id'} eq $courses{$key}) {
Line 2010 sub hidden_button_check {	Line 2013 sub hidden_button_check {
return;	return;
}	}
if ($env{'request.role.adv'}) {	if ($env{'request.role.adv'}) {
return;	unless (&Apache::loncommon::needs_gci_custom()) {
	return;
	}
}	}
my $buttonshide = &Apache::lonnet::EXT('resource.0.buttonshide');	my $buttonshide = &Apache::lonnet::EXT('resource.0.buttonshide');
return $buttonshide;	return $buttonshide;