Lines 216-223
elsif ( defined $query->param('code') ) {
Link Here
|
216 |
my ( $userid, $cookie, $session_id ) = |
216 |
my ( $userid, $cookie, $session_id ) = |
217 |
checkauth( $query, 1, {}, 'opac', $email ); |
217 |
checkauth( $query, 1, {}, 'opac', $email ); |
218 |
if ($userid) { # A user with this email is registered in koha |
218 |
if ($userid) { # A user with this email is registered in koha |
|
|
219 |
|
220 |
#handle redirect to main.pl, for private opac |
221 |
my $uri; |
222 |
if (C4::Context->preference('OpacPublic') ) { |
223 |
$uri = '/cgi-bin/koha/opac-user.pl'; |
224 |
} else { |
225 |
$uri = '/cgi-bin/koha/opac-main.pl'; |
226 |
} |
219 |
print $query->redirect( |
227 |
print $query->redirect( |
220 |
-uri => '/cgi-bin/koha/opac-user.pl', |
228 |
-uri => $uri, |
221 |
-cookie => $cookie |
229 |
-cookie => $cookie |
222 |
); |
230 |
); |
223 |
} |
231 |
} |
224 |
- |
|
|