loncom/interface/lonhelp.pm - diff

Return to lonhelp.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.36, 2007/07/17 22:07:52	version 1.39, 2008/07/08 01:08:57
Line 58 sub processLabelName {	Line 58 sub processLabelName {
# Serve out the text	# Serve out the text
sub servetext {	sub servetext {
my ($r,$text) = @_;	my ($r,$text) = @_;
my $bugs=&Apache::loncommon::help_open_bug('Documentation','Report a documentation bug');	my $bugs=&Apache::loncommon::help_open_bug('Documentation',&mt('Report a documentation bug'));
my $morehelp;#=&Apache::loncommon::help_open_menu(undef,undef,1,undef,undef,undef,undef,'Help and Assistance Menu');	my $morehelp;#=&Apache::loncommon::help_open_menu(undef,undef,1,undef,undef,undef,undef,'Help and Assistance Menu');
my $header=&mt('LON-CAPA Help');	my $header=&mt('LON-CAPA Help');
$r->print(<<HEADER);	$r->print(<<HEADER);
Line 119 sub render {	Line 119 sub render {
'\\begin{html}<a href="/adm/help/'.	'\\begin{html}<a href="/adm/help/'.
$label .	$label .
'.hlp#' . &processLabelName($1) .	'.hlp#' . &processLabelName($1) .
'"><img src="/adm/help/gif/smallHelp.gif" border="0" /></a>' .	'"><img src="/adm/help/help.png" border="0" /></a>' .
'\\end{html}'	'\\end{html}'
\|gxe;	\|gxe;