--- loncom/interface/lonmenu.pm 2006/07/07 21:55:05 1.193 +++ loncom/interface/lonmenu.pm 2006/07/14 19:49:46 1.196 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.193 2006/07/07 21:55:05 raeburn Exp $ +# $Id: lonmenu.pm,v 1.196 2006/07/14 19:49:46 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -134,7 +134,7 @@ ENDDOCS #$lt{'groups'} #ENDGROUPS # } -# } + } my $form=&serverform(); my $utility=&utilityfunctions(); my $output=(<'.$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'); return (< // BEGIN LON-CAPA Internal @@ -246,6 +253,8 @@ $utility + $reloadlink $navmaps @@ -253,8 +262,8 @@ $docs $groups $remote - - + +
$lt{'main'}$lt{'roles'}$lt{'exit'}$helplink$lt{'exit'}
$form @@ -383,7 +392,7 @@ sub innerregister { &Apache::lonnet::allowed('opa',$crs)) { $hwkadd.=&switch('','',7,3,'pparm.gif','problem[_2]','parms[_2]', "gocmd('/adm/parmset','set')", - 'Modify deadlines, etc, for this resource'); + 'Modify parameter settings for this resource'); } # -- End Homework ###