loncom/auth/switchserver.pm - diff

Return to switchserver.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.57, 2021/08/10 15:28:13	version 1.58, 2021/08/11 17:03:03
Line 294 sub handler {	Line 294 sub handler {
my $ssologoutscript = '';	my $ssologoutscript = '';
if ($env{'request.sso.login'}) {	if ($env{'request.sso.login'}) {
$info{'sso.login'} = $env{'request.sso.login'};	$info{'sso.login'} = $env{'request.sso.login'};
my $dom = $env{'user.domain'};
if (defined($r->dir_config("lonSSOUserLogoutScriptFile_$info{domain}"))) {	if (defined($r->dir_config("lonSSOUserLogoutScriptFile_$info{domain}"))) {
if (open(my $fh,'<',$r->dir_config("lonSSOUserLogoutScriptFile_$info{domain}"))) {	if (open(my $fh,'<',$r->dir_config("lonSSOUserLogoutScriptFile_$info{domain}"))) {
$ssologoutscript .= join('',<$fh>);	$ssologoutscript .= join('',<$fh>);
close($fh);	close($fh);
}	}
}	}
if ($env{'request.sso.login'}	if (defined($r->dir_config('lonSSOUserLogoutScriptFile'))) {
&& defined($r->dir_config('lonSSOUserLogoutScriptFile'))) {
if (open(my $fh,'<',$r->dir_config('lonSSOUserLogoutScriptFile'))) {	if (open(my $fh,'<',$r->dir_config('lonSSOUserLogoutScriptFile'))) {
$ssologoutscript .= join('',<$fh>);	$ssologoutscript .= join('',<$fh>);
close($fh);	close($fh);