--- loncom/interface/loncommon.pm 2009/07/08 18:36:26 1.852 +++ loncom/interface/loncommon.pm 2009/07/09 08:53:39 1.853 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.852 2009/07/08 18:36:26 droeschl Exp $ +# $Id: loncommon.pm,v 1.853 2009/07/09 08:53:39 droeschl Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4394,6 +4394,9 @@ sub bodytag { $dc_info = '('.$dc_info.')'; } + $role = "($role)" if $role; + &get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['inhibitmenu']); + if ($env{'environment.remote'} eq 'off') { # No Remote if ($env{'request.state'} eq 'construct') { @@ -4411,8 +4414,6 @@ sub bodytag { if ($no_nav_bar) { $bodytag .= $titletable; } else { - $role = "($role)" if $role; - &get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['inhibitmenu']); $bodytag .= qq|
$name $role
$realm $dc_info
| unless $env{'form.inhibitmenu'}; @@ -4439,7 +4440,12 @@ sub bodytag { # Explicit link to get inline menu my $menu= ($no_inline_link?'' - :'
'.&mt('Switch to Inline Menu Mode').''); + :''.&mt('Switch to Inline Menu Mode').''); + $bodytag .= qq|
$name $role + $realm $dc_info
+
    +
  1. $menu
  2. +
| unless $env{'form.inhibitmenu'}; # return(<