--- loncom/interface/loncommon.pm 2010/11/09 03:20:32 1.925.2.18 +++ loncom/interface/loncommon.pm 2010/11/30 06:28:17 1.925.2.19 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.925.2.18 2010/11/09 03:20:32 raeburn Exp $ +# $Id: loncommon.pm,v 1.925.2.19 2010/11/30 06:28:17 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4463,6 +4463,11 @@ sub bodytag { my ($title,$function,$addentries,$bodyonly,$domain,$forcereg, $no_nav_bar,$bgcolor,$no_inline_link,$args)=@_; + my $public; + if ((($env{'user.name'} eq 'public') && ($env{'user.domain'} eq 'public')) + || ($env{'user.name'} eq '') && ($env{'user.domain'} eq '')) { + $public = 1; + } if (!$args->{'no_auto_mt_title'}) { $title = &mt($title); } $function = &get_users_function() if (!$function); @@ -4528,7 +4533,7 @@ sub bodytag { } my $name = &plainname($env{'user.name'},$env{'user.domain'}); - if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') { + if ($public) { undef($role); } else { $name = &aboutmewrapper($name,$env{'user.name'},$env{'user.domain'}); @@ -4549,7 +4554,7 @@ sub bodytag { $role = '('.$role.')' if $role; &get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['inhibitmenu']); - if ($env{'environment.remote'} eq 'off') { + if ($env{'environment.remote'} ne 'on') { # No Remote if ($no_nav_bar || $env{'form.inhibitmenu'} eq 'yes') { return $bodytag; @@ -4658,7 +4663,7 @@ ENDSCRIPT } #don't show menus for public users - if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){ + if(!$public){ if (($custommenu) && ($env{'request.role'} !~ m{^st\./gcitest/$match_courseid})) { $bodytag .= &Apache::lonmenu::gci_secondary_menu();