loncom/auth/switchserver.pm - diff

Return to switchserver.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.60, 2022/06/18 02:10:18	version 1.61, 2022/06/30 21:04:13
Line 312 sub handler {	Line 312 sub handler {
}	}
if ($env{'request.linkprot'}) {	if ($env{'request.linkprot'}) {
$info{'linkprot'} = $env{'request.linkprot'};	$info{'linkprot'} = $env{'request.linkprot'};
if ($env{'request.linkprotuser'}) {	foreach my $item ('linkprotuser','linkprotexit') {
$info{'linkprotuser'} = $env{'request.linkprotuser'};	if ($env{'request.'.$item}) {
	$info{$item} = $env{'request.'.$item};
	}
}	}
} elsif ($env{'request.linkkey'} ne '') {	} elsif ($env{'request.linkkey'} ne '') {
$info{'linkkey'} = $env{'request.linkkey'};	$info{'linkkey'} = $env{'request.linkkey'};