--- loncom/interface/lonmenu.pm 2008/03/10 23:47:35 1.235 +++ loncom/interface/lonmenu.pm 2008/06/13 01:07:50 1.238 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.235 2008/03/10 23:47:35 raeburn Exp $ +# $Id: lonmenu.pm,v 1.238 2008/06/13 01:07:50 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -434,7 +434,7 @@ sub innerregister { my $action = "go('/priv/".$env{'user.name'}."');"; my $cadom = $env{'request.role.domain'}; my $caname = $env{'user.name'}; - my $desc = "Enter my resource construction space"; + my $desc = "Enter my construction space"; # Set defaults for co-authors if ($env{'request.role'} =~ /^ca/) { ($cadom,$caname)=($env{'request.role'}=~/($match_domain)\/($match_username)$/); @@ -898,8 +898,9 @@ sub switch { $top=&mt($top); $bot=&mt($bot); $desc=&mt($desc); - $img=&mt($img); - + if (($env{'environment.remote'} ne 'off') || ($env{'environment.icons'} eq 'classic')) { + $img=&mt($img); + } my $idx=10*$row+$col; $category_members{$cat}.=':'.$idx; @@ -1473,7 +1474,7 @@ sub roles_selector { $role_selector = &jump_to_role($cdom,$cnum); $role_selector .= '