[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /auth lonlogout.pm

[raeburn]

raeburn		Thu Aug  1 14:30:27 2019 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/auth	lonlogout.pm 
  Log:
  - For 2.11
    Backport 1.56
  
  
Index: loncom/auth/lonlogout.pm
diff -u loncom/auth/lonlogout.pm:1.45.2.5 loncom/auth/lonlogout.pm:1.45.2.6
--- loncom/auth/lonlogout.pm:1.45.2.5	Tue Sep 11 14:23:21 2018
+++ loncom/auth/lonlogout.pm	Thu Aug  1 14:30:27 2019
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Logout Handler
 #
-# $Id: lonlogout.pm,v 1.45.2.5 2018/09/11 14:23:21 raeburn Exp $
+# $Id: lonlogout.pm,v 1.45.2.6 2019/08/01 14:30:27 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -217,6 +217,13 @@
 $relogmessage
 $end_page
 ENDDOCUMENT
+    if ($env{'request.balancercookie'}) {
+        my ($balancer,$cookie) = split(/:/,$env{'request.balancercookie'});
+        if ((&Apache::lonnet::hostname($balancer)) && ($cookie =~ /^[a-f0-9]{32}$/)) {
+            $cookie = $env{'user.domain'}.'_'.$env{'user.name'}.'_'.$cookie;
+            &Apache::lonnet::delbalcookie($cookie,$balancer);
+        }
+    }
     $r->register_cleanup(\&flush_course_logs);
     return OK; 
 }