--- loncom/interface/loncommon.pm 2012/12/22 15:53:00 1.1075.2.21 +++ loncom/interface/loncommon.pm 2012/12/22 16:03:25 1.1075.2.22 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.1075.2.21 2012/12/22 15:53:00 raeburn Exp $ +# $Id: loncommon.pm,v 1.1075.2.22 2012/12/22 16:03:25 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5026,8 +5026,6 @@ sub bodytag { } if (!$realm) { $realm=' '; } -# Set messages - my $messages=&domainlogo($domain); my $extra_body_attr = &make_attr_string($forcereg,\%design); @@ -5089,13 +5087,11 @@ sub bodytag { if ($env{'request.noversionuri'} =~ m{^/res/adm/pages/}) { - unless ($env{'request.noversionuri'} =~ m{/res/adm/pages/bookmarkmenu/}) { - if ($dc_info) { - $dc_info = qq|$dc_info|; - } - $bodytag .= qq|
$name $role
- $realm $dc_info
|; + if ($dc_info) { + $dc_info = qq|$dc_info|; } + $bodytag .= qq|
$name $role
+ $realm $dc_info
|; return $bodytag; } @@ -5122,7 +5118,8 @@ sub bodytag { $bodytag .= &Apache::lonmenu::innerregister($forcereg, $args->{'bread_crumbs'}); } elsif ($forcereg) { - $bodytag .= &Apache::lonmenu::innerregister($forcereg); + $bodytag .= &Apache::lonmenu::innerregister($forcereg,undef, + $args->{'group'}); } else { my $forbodytag; &Apache::lonmenu::prepare_functions($env{'request.noversionuri'},