loncom/auth/switchserver.pm - diff

Return to switchserver.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.31, 2011/08/02 14:17:13	version 1.32, 2013/09/29 00:49:24
Line 173 sub handler {	Line 173 sub handler {

# ---------------------------------------------------------------- Get handover	# ---------------------------------------------------------------- Get handover

	my ($is_balancer) = &Apache::lonnet::check_loadbalancing($env{'user.name'},$env{'user.domain'});
my %info=('ip' => $ENV{'REMOTE_ADDR'},	my %info=('ip' => $ENV{'REMOTE_ADDR'},
'domain' => $env{'user.domain'},	'domain' => $env{'user.domain'},
'username' => $env{'user.name'},	'username' => $env{'user.name'},
'role' => $env{'form.role'},	'role' => $env{'form.role'},
'server' => $r->dir_config('lonHostID'));	'server' => $r->dir_config('lonHostID'),
	'balancer' => $is_balancer);
if ($env{'form.origurl'}) {	if ($env{'form.origurl'}) {
$info{'origurl'} = $env{'form.origurl'};	$info{'origurl'} = $env{'form.origurl'};
}	}