--- loncom/interface/lonmenu.pm 2006/07/18 19:45:15 1.197
+++ loncom/interface/lonmenu.pm 2006/07/19 10:52:27 1.199
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines to control the menu
#
-# $Id: lonmenu.pm,v 1.197 2006/07/18 19:45:15 raeburn Exp $
+# $Id: lonmenu.pm,v 1.199 2006/07/19 10:52:27 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -90,6 +90,10 @@ sub menubuttons {
my $escurl=&escape(&Apache::lonenc::check_encrypt($env{'request.noversionuri'}));
my $escsymb=&escape(&Apache::lonenc::check_encrypt($env{'request.symb'}));
+ my $logo=&Apache::loncommon::lonhttpdurl("/adm/lonIcons/minilogo.gif");
+ $logo = '
![LON-CAPA Logo]('.
+ $logo.') | ';
+
if ($env{'request.state'} eq 'construct') {
if (($env{'request.noversionuri'} eq '') || (!defined($env{'request.noversionuri'}))) {
my $returnurl = $env{'request.filename'};
@@ -167,14 +171,14 @@ ENDMAINMENU
my $vlink=&Apache::loncommon::designparm($function.'.vlink',$domain);
my $sidebg=&Apache::loncommon::designparm($function.'.sidebg',$domain);
if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') {
- my $logo=&Apache::loncommon::lonhttpdurl("/adm/lonIcons/minilogo.gif");
return (<
-
+ $logo
+ | |
+
$lt{'exit'}
|
- LON-CAPA![Logo]($logo) |
@@ -230,18 +234,12 @@ ENDCRELOAD
}
my $form=&serverform();
my $utility=&utilityfunctions();
- my $logo=&Apache::loncommon::lonhttpdurl("/adm/lonIcons/minilogo.gif");
my $remote;
if ($env{'user.adv'}) {
$remote = ''.$lt{'launch'}.' | '
}
- my $helptopic='Student_Intro';
- if ($env{'request.role'}=~/^(ca|au)/) {
- $helptopic='Authoring_Intro';
- } elsif ($env{'request.role'}=~/^cc/) {
- $helptopic='Course_Coordination_Intro';
- }
- my $helplink=&Apache::loncommon::help_open_topic($helptopic,'Help');
+
+ my $helplink=&Apache::loncommon::top_nav_help('Help');
return (<
// BEGIN LON-CAPA Internal
@@ -251,8 +249,7 @@ $utility
$form