loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.383, 2012/08/03 01:23:38	version 1.385, 2012/08/16 18:35:47
Line 393 sub secondary_menu {	Line 393 sub secondary_menu {
}	}
$menu =~ s/\[uname\]/$$author{user}/g;	$menu =~ s/\[uname\]/$$author{user}/g;
$menu =~ s/\[udom\]/$$author{dom}/g;	$menu =~ s/\[udom\]/$$author{dom}/g;
	if ($menu) {
return "<ul id=\"LC_secondary_menu\">$menu</ul>";	$menu = "<ul id=\"LC_secondary_menu\">$menu</ul>";
	}
	return $menu;
}	}

sub create_submenu {	sub create_submenu {
Line 753 ENDREALRES	Line 755 ENDREALRES
$menuitems .= (<<ENDMENUITEMS);	$menuitems .= (<<ENDMENUITEMS);
s&8&3&prt.png&Print&printout[_1]&gopost('/adm/printout',currentURL)&Prepare a printable document	s&8&3&prt.png&Print&printout[_1]&gopost('/adm/printout',currentURL)&Prepare a printable document
ENDMENUITEMS	ENDMENUITEMS
$gotprt = 1;	$got_prt = 1;
}	}
unless ($got_wishlist) {	unless ($got_wishlist) {
if (($env{'user.adv'}) && (!$env{'request.enc'})) {	if (($env{'user.adv'}) && (!$env{'request.enc'})) {