loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.75, 2003/01/10 20:02:15	version 1.77, 2003/02/12 01:59:34
Line 27	Line 27
#	#
# YEAR=2001	# YEAR=2001
# 2/13-12/7 Guy Albertelli	# 2/13-12/7 Guy Albertelli
# 12/11,12/12,12/17 Scott Harrison
# 12/21 Gerd Kortemeyer	# 12/21 Gerd Kortemeyer
# 12/21 Scott Harrison
# 12/25,12/28 Gerd Kortemeyer	# 12/25,12/28 Gerd Kortemeyer
# YEAR=2002	# YEAR=2002
# 1/4 Gerd Kortemeyer	# 1/4 Gerd Kortemeyer
Line 540 sub help_open_topic {	Line 538 sub help_open_topic {
# Add the text	# Add the text
if ($text ne "")	if ($text ne "")
{	{
$template .= "<a href=\"$link\">$text</a> ";	$template .=
	"<table bgcolor='#3333AA' cellspacing='1' cellpadding='1' border='0'><tr>".
	"<td bgcolor='#5555FF'><a href=\"$link\"><font color='#FFFFFF' size='2'>$text</a>";
}	}

# Add the graphic	# Add the graphic
$template .= <<"ENDTEMPLATE";	$template .= <<"ENDTEMPLATE";
<a href="$link"><image src="/adm/help/gif/smallHelp.gif" border="0" alt="(Help: $topic)" /></a>	<a href="$link"><image src="/adm/help/gif/smallHelp.gif" border="0" alt="(Help: $topic)" /></a>
ENDTEMPLATE	ENDTEMPLATE
	if ($text ne '') { $template.='</font></td></tr></table>' };
return $template;	return $template;

}	}