loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.79, 2003/06/23 19:08:03	version 1.80, 2003/07/05 10:07:11
Line 229 sub innerregister {	Line 229 sub innerregister {
}	}
if (&Apache::lonmsg::newmail()) {	if (&Apache::lonmsg::newmail()) {
$newmail=($textual?	$newmail=($textual?
'<b><a href="/adm/communicate">You have new messages</a></b><br />':	'<b><a href="/adm/communicate" target="_top">You have new messages</a></b><br />':
'swmenu.setstatus("you have","messages");');	'swmenu.setstatus("you have","messages");');
}	}
if ($noremote) {	if ($noremote) {
Line 340 ENDMENUITEMS	Line 340 ENDMENUITEMS
unless ($ENV{'REQUEST_URI'}=~/\/(bulletinboard\|smppg\|navmaps\|syllabus\|aboutme)(\?\|$)/) {	unless ($ENV{'REQUEST_URI'}=~/\/(bulletinboard\|smppg\|navmaps\|syllabus\|aboutme)(\?\|$)/) {
$menuitems.=(<<ENDREALRES);	$menuitems.=(<<ENDREALRES);
s&6&3&catalog.gif&catalog&info&catalog_info()&Show catalog information	s&6&3&catalog.gif&catalog&info&catalog_info()&Show catalog information
s&8&1&eval.gif&evaluate&this&gopost('/adm/evaluate',currentURL)&Provide my evaluation of this resource	s&8&1&eval.gif&evaluate&this&gopost('/adm/evaluate',currentURL,1)&Provide my evaluation of this resource
s&8&2&fdbk.gif&feedback&discuss&gopost('/adm/feedback',currentURL)&Provide feedback messages or contribute to the course discussion about this resource	s&8&2&fdbk.gif&feedback&discuss&gopost('/adm/feedback',currentURL,1)&Provide feedback messages or contribute to the course discussion about this resource
ENDREALRES	ENDREALRES
}	}
my $buttons='';	my $buttons='';