--- loncom/auth/switchserver.pm 2024/10/08 20:46:49 1.35.2.6.2.7 +++ loncom/auth/switchserver.pm 2024/10/09 15:49:17 1.35.2.6.2.8 @@ -1,7 +1,7 @@ # The LearningOnline Network # Switch Servers Handler # -# $Id: switchserver.pm,v 1.35.2.6.2.7 2024/10/08 20:46:49 raeburn Exp $ +# $Id: switchserver.pm,v 1.35.2.6.2.8 2024/10/09 15:49:17 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -31,6 +31,8 @@ package Apache::switchserver; use strict; use Apache::Constants qw(:common :remotehost); use Apache::lonnet; +use Apache::loncommon; +use Apache::lonmenu; use Digest::MD5 qw(md5_hex); use CGI::Cookie(); use Apache::lonlocal; @@ -274,6 +276,8 @@ sub handler { } # -------------------------------------------------------- Menu script and info + my $windowinfo = &Apache::lonmenu::close(); + # ---------------------------------------------------------------- Get handover my ($is_balancer,$setcookie,$newcookieid,$otherbalcookie); @@ -399,7 +403,8 @@ sub handler { $url .= join('&',@args); } # --------------------------------------------------------------- Screen Output - return &do_redirect($r, $url, $only_body, $ssologoutscript, $env{'form.lcssowin'}); + return &do_redirect($r, $url, $only_body, $windowinfo.$ssologoutscript, + $env{'form.lcssowin'}); } 1;