loncom/auth/lonlogin.pm - diff

Return to lonlogin.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.19, 2002/07/10 17:47:01	version 1.20, 2002/08/26 12:47:28
Line 104 sub handler {	Line 104 sub handler {
my $logtoken=Apache::lonnet::reply(	my $logtoken=Apache::lonnet::reply(
'tmpput:'.$ukey.$lkey.'&'.$firsturl,	'tmpput:'.$ukey.$lkey.'&'.$firsturl,
$lonhost);	$lonhost);
	my $domainlogo=&Apache::loncommon::domainlogo();
# --------------------------------------------------- Print login screen header	# --------------------------------------------------- Print login screen header
$r->print(<<ENDHEADER);	$r->print(<<ENDHEADER);
<html>	<html>
Line 299 ENDLOGIN	Line 299 ENDLOGIN
<td width=27 background="$iconpath/fillleft.gif"><img src="$iconpath/fillleft.gif" alt="" /></td>	<td width=27 background="$iconpath/fillleft.gif"><img src="$iconpath/fillleft.gif" alt="" /></td>

<!-- Row 5 Column 3 -->	<!-- Row 5 Column 3 -->
<td width="100%" valign="bottom" bgcolor="#ffffff"><img src="$iconpath/litetext.gif" alt="Laboratory for Instructional Technology in Education" /><img src="$iconpath/lite.gif" alt="" /></td>	<td width="100%" valign="bottom" bgcolor="#ffffff">
	$domainlogo
	</td>

<!-- Row 5 Column 4 -->	<!-- Row 5 Column 4 -->
<td width=27 background="$iconpath/fillright.gif"><img src="$iconpath/fillright.gif" alt="" /></td>	<td width=27 background="$iconpath/fillright.gif"><img src="$iconpath/fillright.gif" alt="" /></td>