loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.315.2.3, 2010/08/26 04:11:34	version 1.315.2.5, 2010/12/25 00:32:05
Line 245 sub primary_menu {	Line 245 sub primary_menu {


if ($$menuitem[3] eq 'Help') { # special treatment for helplink	if ($$menuitem[3] eq 'Help') { # special treatment for helplink
$menu .= '<li>'.&Apache::loncommon::top_nav_help('Help').'</li>';	if ($public) {
	my $origmail = $Apache::lonnet::perlvar{'lonSupportEMail'};
	my $defdom = &Apache::lonnet::default_login_domain();
	my $to = &Apache::loncommon::build_recipient_list(undef,
	'helpdeskmail',
	$defdom,$origmail);
	if ($to ne '') {
	$menu .= &prep_menuitem($menuitem);
	}
	} else {
	$menu .= '<li>'.&Apache::loncommon::top_nav_help('Help').'</li>';
	}
} else {	} else {
my @items = @{$menuitem};	my @items = @{$menuitem};
$items[0] = 'javascript:'.$menuitem->[0].';';	$items[0] = 'javascript:'.$menuitem->[0].';';
Line 2038 function adhocRole(roleitem) {	Line 2049 function adhocRole(roleitem) {
secok = 0;	secok = 0;
var numrolesec = rolesections[selidx].length;	var numrolesec = rolesections[selidx].length;
var msgidx = numsec[selidx] - numrolesec;	var msgidx = numsec[selidx] - numrolesec;
secchoice = prompt("$lt{'this'}\\n"+secpick[msgidx]+"\\n$lt{'avai'} "+roleseclist[selidx],"");	secchoice = prompt("$lt{'this'} "+secpick[msgidx]+"\\n$lt{'avai'} "+roleseclist[selidx],"");
if (secchoice == '') {	if (secchoice == '') {
if (msgidx > 0) {	if (msgidx > 0) {
secok = 1;	secok = 1;