--- loncom/auth/switchserver.pm 2021/10/26 14:20:40 1.59 +++ loncom/auth/switchserver.pm 2022/06/30 21:04:13 1.61 @@ -1,7 +1,7 @@ # The LearningOnline Network # Switch Servers Handler # -# $Id: switchserver.pm,v 1.59 2021/10/26 14:20:40 raeburn Exp $ +# $Id: switchserver.pm,v 1.61 2022/06/30 21:04:13 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -97,7 +97,7 @@ sub flush_course_logs { sub handler { my ($r) = @_; - + my $handle=&init_env($r); if (!defined($handle)) { return FORBIDDEN; } @@ -312,6 +312,11 @@ sub handler { } if ($env{'request.linkprot'}) { $info{'linkprot'} = $env{'request.linkprot'}; + foreach my $item ('linkprotuser','linkprotexit') { + if ($env{'request.'.$item}) { + $info{$item} = $env{'request.'.$item}; + } + } } elsif ($env{'request.linkkey'} ne '') { $info{'linkkey'} = $env{'request.linkkey'}; }