loncom/auth/lonacc.pm - diff

Return to lonacc.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.162, 2015/12/03 20:40:21	version 1.164, 2016/08/16 20:17:49
Line 109 sub cleanup {	Line 109 sub cleanup {
my ($r)=@_;	my ($r)=@_;
if (! $r->is_initial_req()) { return DECLINED; }	if (! $r->is_initial_req()) { return DECLINED; }
&Apache::lonnet::save_cache();	&Apache::lonnet::save_cache();
&Apache::lontexconvert::jsMath_reset();
return OK;	return OK;
}	}

Line 361 sub sso_login {	Line 360 sub sso_login {
} else {	} else {
# need to login them in, so generate the need data that	# need to login them in, so generate the need data that
# migrate expects to do login	# migrate expects to do login
my $ip;	my $ip = $r->get_remote_host();
my $c = $r->connection;
eval {
$ip = $c->remote_ip();
};
if ($@) {
$ip = $c->client_ip();
}
my %info=('ip' => $ip,	my %info=('ip' => $ip,
'domain' => $domain,	'domain' => $domain,
'username' => $user,	'username' => $user,