--- loncom/interface/lonmenu.pm 2010/08/24 09:11:38 1.337 +++ loncom/interface/lonmenu.pm 2010/12/02 06:00:12 1.340 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.337 2010/08/24 09:11:38 wenzelju Exp $ +# $Id: lonmenu.pm,v 1.340 2010/12/02 06:00:12 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -214,7 +214,18 @@ sub primary_menu { if ($$menuitem[3] eq 'Help') { # special treatment for helplink - $menu .= '
  • '.&Apache::loncommon::top_nav_help('Help').'
  • '; + 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 .= '
  • '.&Apache::loncommon::top_nav_help('Help').'
  • '; + } } else { $menu .= prep_menuitem($menuitem); } @@ -1123,6 +1134,10 @@ sub utilityfunctions { # it is split into 3 parts and the inputfields for title and path are left out # these fields are inserted later to set the values for title and path # automatically via JavaScript (document.title and location.pathname) + my %folders = &Apache::lonnet::get('wishlist',['folders']); + if ($folders{'folders'} eq '') { + $folders{'folders'} = ''; + } my $in_page_wishlistlink1 = '

    '.&mt('Set a link to wishlist').'

    '. '
    '. @@ -1140,7 +1155,7 @@ sub utilityfunctions { '

    '. ''. ''. ''. '
    '; @@ -1560,7 +1575,7 @@ function adhocRole(roleitem) { secok = 0; var numrolesec = rolesections[selidx].length; 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 (msgidx > 0) { secok = 1;