Lines 27-34
use C4::Labels;
Link Here
|
27 |
use C4::Auth qw( check_cookie_auth ); |
27 |
use C4::Auth qw( check_cookie_auth ); |
28 |
|
28 |
|
29 |
my $cgi = CGI->new; |
29 |
my $cgi = CGI->new; |
|
|
30 |
my $session_cookie = $cgi->cookie('CGISESSID'); |
30 |
my ($auth_status) = |
31 |
my ($auth_status) = |
31 |
check_cookie_auth( $cgi->cookie('CGISESSID'), { catalogue => 1 } ); |
32 |
check_cookie_auth( $session_cookie, { catalogue => 1 } ); |
32 |
if ( $auth_status ne "ok" ) { |
33 |
if ( $auth_status ne "ok" ) { |
33 |
print $cgi->header( -type => 'text/plain', -status => '403 Forbidden' ); |
34 |
print $cgi->header( -type => 'text/plain', -status => '403 Forbidden' ); |
34 |
exit 0; |
35 |
exit 0; |