Diff for /loncom/auth/lonlogout.pm between versions 1.45.2.4 and 1.45.2.6

version 1.45.2.4, 2018/09/02 21:23:08 version 1.45.2.6, 2019/08/01 14:30:27
Line 196  Due to security reasons in new web brows Line 196  Due to security reasons in new web brows
         }          }
         if ($env{'request.sso.login'}          if ($env{'request.sso.login'}
     && defined($r->dir_config("lonSSOUserLogoutMessageFile_$domain"))) {      && defined($r->dir_config("lonSSOUserLogoutMessageFile_$domain"))) {
     if (open(my $fh,$r->dir_config("lonSSOUserLogoutMessageFile_$domain"))) {      if (open(my $fh,'<',$r->dir_config("lonSSOUserLogoutMessageFile_$domain"))) {
         $relogmessage.= join('',<$fh>);          $relogmessage.= join('',<$fh>);
                 close($fh);                  close($fh);
             }              }
  }   }
  if ($env{'request.sso.login'}   if ($env{'request.sso.login'}
     && defined($r->dir_config('lonSSOUserLogoutMessageFile'))) {      && defined($r->dir_config('lonSSOUserLogoutMessageFile'))) {
     if (open(my $fh,$r->dir_config('lonSSOUserLogoutMessageFile'))) {      if (open(my $fh,'<',$r->dir_config('lonSSOUserLogoutMessageFile'))) {
         $relogmessage.= join('',<$fh>);          $relogmessage.= join('',<$fh>);
                 close($fh);                  close($fh);
             }              }
Line 217  $windowinfo Line 217  $windowinfo
 $relogmessage  $relogmessage
 $end_page  $end_page
 ENDDOCUMENT  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);      $r->register_cleanup(\&flush_course_logs);
     return OK;       return OK; 
 }  }

Removed from v.1.45.2.4  
changed lines
  Added in v.1.45.2.6


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>