loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.76, 2006/05/01 21:04:31	version 1.77, 2006/05/31 15:33:39
Line 367 ENDFAILED	Line 367 ENDFAILED
failed($r,'Information needed to verify your login information is missing, inaccessible or expired.');	failed($r,'Information needed to verify your login information is missing, inaccessible or expired.');
return OK;	return OK;
} else {	} else {
unless (&Apache::lonnet::reply('tmpdel:'.$FORM{'logtoken'},	my $reply = &Apache::lonnet::reply('tmpdel:'.$FORM{'logtoken'},
$FORM{'serverid'}) eq 'ok') {	$FORM{'serverid'});
	if ( $reply ne 'ok' ) {
&failed($r,'Session could not be opened.');	&failed($r,'Session could not be opened.');
	&Apache::lonnet::logthis("ERROR got a reply of $reply when trying to contact ". $FORM{'serverid'}." to get login token");
	return OK;
}	}
}	}
my ($key,$firsturl)=split(/&/,$tmpinfo);	my ($key,$firsturl)=split(/&/,$tmpinfo);