loncom/auth/lonlogin.pm - diff

Return to lonlogin.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.21, 2002/08/28 19:42:48	version 1.25, 2002/10/14 16:14:58
Line 78 sub handler {	Line 78 sub handler {
my $firsturl=$ENV{'request.firsturl'};	my $firsturl=$ENV{'request.firsturl'};
# ---------------------------------------- Are we access server and overloaded?	# ---------------------------------------- Are we access server and overloaded?
if (($role eq 'access') && ($loadpercent>100.0)) {	if (($role eq 'access') && ($loadpercent>100.0)) {
$otherserver=Apache::lonnet::spareserver();	$otherserver=Apache::lonnet::spareserver($loadpercent);
}	}

# -------------------------------------------------------- Set login parameters	# -------------------------------------------------------- Set login parameters
Line 335 $domainlogo	Line 335 $domainlogo
</tr>	</tr>
</table>	</table>

	<script>
	// the if prevents the script error if the browser can't handle this
	if ( document.client.uname ) { document.client.uname.focus(); }
	</script>

ENDDOCUMENT	ENDDOCUMENT
}	}
$r->print('</body></html>');	$r->print('</body></html>');