--- loncom/auth/switchserver.pm 2021/12/12 21:07:21 1.35.2.6 +++ loncom/auth/switchserver.pm 2022/01/01 16:33:13 1.35.2.6.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network # Switch Servers Handler # -# $Id: switchserver.pm,v 1.35.2.6 2021/12/12 21:07:21 raeburn Exp $ +# $Id: switchserver.pm,v 1.35.2.6.2.1 2022/01/01 16:33:13 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -289,6 +289,14 @@ sub handler { if ($env{'request.sso.reloginserver'}) { $info{'sso.reloginserver'} = $env{'request.sso.reloginserver'}; } + if ($env{'request.linkprot'}) { + $info{'linkprot'} = $env{'request.linkprot'}; + } elsif ($env{'request.linkkey'} ne '') { + $info{'linkkey'} = $env{'request.linkkey'}; + } + if ($env{'request.deeplink.login'}) { + $info{'deeplink.login'} = $env{'request.deeplink.login'}; + } my $token = &Apache::lonnet::tmpput(\%info,$env{'form.otherserver'}); my $url =$protocol.'://'.$switch_to.'/adm/login?'. 'domain='.$env{'user.domain'}.