Lines 35-41
unless (C4::Context->preference('OPACpatronimages')) {
Link Here
|
35 |
my $needed_flags; |
35 |
my $needed_flags; |
36 |
my %cookies = CGI::Cookie->fetch; |
36 |
my %cookies = CGI::Cookie->fetch; |
37 |
my $sessid = $cookies{'CGISESSID'}->value; |
37 |
my $sessid = $cookies{'CGISESSID'}->value; |
|
|
38 |
|
38 |
my ($auth_status) = check_cookie_auth($sessid, $needed_flags); |
39 |
my ($auth_status) = check_cookie_auth($sessid, $needed_flags); |
|
|
40 |
if( $auth_status ne 'ok' ) { |
41 |
print CGI::header( '-status' => '401' ); |
42 |
exit 0; |
43 |
} |
44 |
|
39 |
my $borrowernumber = C4::Context->userenv->{'number'}; |
45 |
my $borrowernumber = C4::Context->userenv->{'number'}; |
40 |
|
46 |
|
41 |
my $patron_image = Koha::Patron::Images->find($borrowernumber); |
47 |
my $patron_image = Koha::Patron::Images->find($borrowernumber); |
42 |
- |
|
|