Lines 182-189
elsif ( defined $query->param('code') ) {
Link Here
|
182 |
my ( $userid, $cookie, $session_id ) = |
182 |
my ( $userid, $cookie, $session_id ) = |
183 |
checkauth( $query, 1, {}, 'opac', $email ); |
183 |
checkauth( $query, 1, {}, 'opac', $email ); |
184 |
if ($userid) { # A user with this email is registered in koha |
184 |
if ($userid) { # A user with this email is registered in koha |
|
|
185 |
|
186 |
#handle redirect to main.pl, for private opac |
187 |
my $uri; |
188 |
if (C4::Context->preference('OpacPublic') ) { |
189 |
$uri = '/cgi-bin/koha/opac-user.pl'; |
190 |
} else { |
191 |
$uri = '/cgi-bin/koha/opac-main.pl'; |
192 |
} |
185 |
print $query->redirect( |
193 |
print $query->redirect( |
186 |
-uri => '/cgi-bin/koha/opac-user.pl', |
194 |
-uri => $uri, |
187 |
-cookie => $cookie |
195 |
-cookie => $cookie |
188 |
); |
196 |
); |
189 |
} |
197 |
} |
190 |
- |
|
|