loncom/auth/lonlogin.pm - diff

Return to lonlogin.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.182, 2020/12/18 15:23:03	version 1.183, 2021/05/03 15:27:44
Line 143 sub handler {	Line 143 sub handler {
if ($balancer_token) {	if ($balancer_token) {
$dest .= (($dest=~/\?/)?'&;':'?') . 'btoken='.$balancer_token;	$dest .= (($dest=~/\?/)?'&;':'?') . 'btoken='.$balancer_token;
}	}
	unless ($found_server eq $lonhost) {
	my $alias = &Apache::lonnet::use_proxy_alias($r,$found_server);
	$hostname = $alias if ($alias ne '');
	}
my $url = $protocol.'://'.$hostname.$dest;	my $url = $protocol.'://'.$hostname.$dest;
my $start_page =	my $start_page =
&Apache::loncommon::start_page('Switching Server ...',undef,	&Apache::loncommon::start_page('Switching Server ...',undef,