--- loncom/interface/loncommon.pm 2004/07/21 20:23:34 1.202 +++ loncom/interface/loncommon.pm 2004/07/26 21:57:27 1.203 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.202 2004/07/21 20:23:34 albertel Exp $ +# $Id: loncommon.pm,v 1.203 2004/07/26 21:57:27 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -690,6 +690,19 @@ function helpMenu(caller) { (Help Menu) ENDTEMPLATE + if ($component_help) { + if (!$text) { + $template=&help_open_topic($component_help,undef,$stayOnPage, + $width,$height).' '.$template; + } else { + my $help_text; + $help_text=&Apache::lonnet::unescape($topic); + $template='
'. + &help_open_topic($component_help,$help_text,$stayOnPage, + $width,$height).''.$template. + '
'; + } + } if ($text ne '') { $template.='' }; return $template; }