version 1.893, 2009/10/01 17:25:17
|
version 1.894, 2009/10/04 17:47:21
|
Line 4440 sub bodytag {
|
Line 4440 sub bodytag {
|
|
|
if ($env{'environment.remote'} eq 'off') { |
if ($env{'environment.remote'} eq 'off') { |
# No Remote |
# No Remote |
if ($env{'request.state'} eq 'construct') { |
if ($env{'request.state'} eq 'construct') { |
$forcereg=1; |
$forcereg=1; |
} |
} |
|
|
# if ($env{'request.state'} eq 'construct') { |
# if ($env{'request.state'} eq 'construct') { |
# $titleinfo = &CSTR_pageheader(); #FIXME: Will be removed once all scripts have their own calls |
# $titleinfo = &CSTR_pageheader(); #FIXME: Will be removed once all scripts have their own calls |
# } |
# } |
|
|
my $titletable = '<table id="LC_title_bar">' |
my $titletable = '<table id="LC_title_bar">' |
."<tr><td> $titleinfo $dc_info</td>" |
."<tr><td> $titleinfo $dc_info</td>" |
.'</tr></table>'; |
.'</tr></table>'; |
|
|
|
if ($no_nav_bar) { |
|
$bodytag .= $titletable; |
|
} else { |
|
$bodytag .= qq|<div id="LC_nav_bar">$name $role<br /> |
|
<em>$realm</em> $dc_info</div>| unless $env{'form.inhibitmenu'}; |
|
|
|
#SD $titletable is obsolete |
|
#SD if ($env{'request.state'} eq 'construct') { |
|
#SD $bodytag .= &Apache::lonmenu::menubuttons($forcereg,$titletable); |
|
#SD } else { |
|
#SD $bodytag .= &Apache::lonmenu::menubuttons($forcereg).$titletable; |
|
#SD } |
|
if ( $env{'form.inhibitmenu'} eq 'yes' |
|
|| $ENV{'REQUEST_URI'} eq '/adm/logout' |
|
|| $env{'request.noversionuri'} =~ m{^/res/adm/pages/}) { |
|
|
|
return $bodytag; |
|
} |
|
|
if ($no_nav_bar) { |
$bodytag .= Apache::lonhtmlcommon::scripttag( |
$bodytag .= $titletable; |
Apache::lonmenu::utilityfunctions(), |
} else { |
'start'); |
$bodytag .= qq|<div id="LC_nav_bar">$name $role<br /> |
$bodytag .= Apache::lonmenu::primary_menu(); |
<em>$realm</em> $dc_info</div>| unless $env{'form.inhibitmenu'}; |
$bodytag .= Apache::lonmenu::secondary_menu(); |
|
#SD remove next line |
if ($env{'request.state'} eq 'construct') { |
#$bodytag .= Apache::lonmenu::menubuttons($forcereg); |
$bodytag .= &Apache::lonmenu::menubuttons($forcereg,$titletable); |
$bodytag .= Apache::lonmenu::serverform(); |
} else { |
$bodytag .= Apache::lonhtmlcommon::scripttag('', 'end'); |
$bodytag .= &Apache::lonmenu::menubuttons($forcereg).$titletable; |
$bodytag .= Apache::lonmenu::innerregister($forcereg) if $forcereg; |
} |
|
} |
} |
return $bodytag; |
return $bodytag; |
} |
} |