loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.13, 2000/10/09 19:43:38	version 1.14, 2000/10/20 20:44:57
Line 98 sub success {	Line 98 sub success {
&Apache::lonnet::log($domain,$username,$authhost,	&Apache::lonnet::log($domain,$username,$authhost,
"Login $ENV{'REMOTE_ADDR'}");	"Login $ENV{'REMOTE_ADDR'}");

	# ------------------------------------------------- Check for critical messages

	my @what=&Apache::lonnet::dump('critical');
	if ($what[0]) {
	if ($what[0] ne 'con_lost') {
	$lowerurl='/adm/email/critical/'.$what[0];
	}
	}

# ------------------------------------------------------------ Get cookie ready	# ------------------------------------------------------------ Get cookie ready

$cookie="lonID=$cookie; path=/";	$cookie="lonID=$cookie; path=/";