Lines 214-225
elsif ( defined $query->param('code') ) {
Link Here
|
214 |
#handle redirect to main.pl, for private opac |
214 |
#handle redirect to main.pl, for private opac |
215 |
my $uri; |
215 |
my $uri; |
216 |
my $referer = $session->param( 'auth-refer-uri' ); |
216 |
my $referer = $session->param( 'auth-refer-uri' ); |
|
|
217 |
my $regex = qr/logout\.x=1/mp; |
218 |
my $fixed_referer = $referer =~ s/$regex//rg; |
217 |
if (C4::Context->preference('OpacPublic') ) { |
219 |
if (C4::Context->preference('OpacPublic') ) { |
218 |
$uri = '/cgi-bin/koha/opac-user.pl'; |
220 |
$uri = '/cgi-bin/koha/opac-user.pl'; |
219 |
} else { |
221 |
} else { |
220 |
$uri = '/cgi-bin/koha/opac-main.pl'; |
222 |
$uri = '/cgi-bin/koha/opac-main.pl'; |
221 |
} |
223 |
} |
222 |
$uri = $referer; |
224 |
$uri = $fixed_referer; |
223 |
print $query->redirect( |
225 |
print $query->redirect( |
224 |
-uri => $uri, |
226 |
-uri => $uri, |
225 |
-cookie => $cookie |
227 |
-cookie => $cookie |
226 |
- |
|
|