--- loncom/interface/loncommon.pm 2003/04/03 21:32:23 1.94 +++ loncom/interface/loncommon.pm 2003/04/05 22:14:40 1.95 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.94 2003/04/03 21:32:23 www Exp $ +# $Id: loncommon.pm,v 1.95 2003/04/05 22:14:40 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1720,28 +1720,27 @@ END if ($bodyonly) { return $bodytag; } elsif ($ENV{'browser.interface'} eq 'textual') { -# -# Accessibility rendering -# +# Accessibility return $bodytag.&Apache::lonmenu::menubuttons($forcereg,'web', $forcereg). '

LON-CAPA: '.$title.'

'; } elsif ($ENV{'environment.remote'} eq 'off') { -# -# No-Remote rendering -# - $upperleft=&Apache::lonmenu::menubuttons($forcereg,'web', - $forcereg); +# No Remote + return $bodytag.&Apache::lonmenu::menubuttons($forcereg,'web', + $forcereg). + '
'.$title. +'
'; } + # -# Top frame rendering +# Top frame rendering, Remote is up # return(< - + $upperleft -$messages +$messages