|
Lines 39-47
use C4::UploadedFile;
Link Here
|
| 39 |
# have been created. |
39 |
# have been created. |
| 40 |
|
40 |
|
| 41 |
my $flags_required = [ |
41 |
my $flags_required = [ |
| 42 |
{circulate => 'circulate_remaining_permissions'}, |
42 |
{circulate => 'circulate_remaining_permissions'}, |
| 43 |
{tools => 'stage_marc_import'}, |
43 |
{tools => 'stage_marc_import'}, |
| 44 |
{tools => 'upload_local_cover_images'} |
44 |
{tools => 'upload_local_cover_images'} |
| 45 |
]; |
45 |
]; |
| 46 |
|
46 |
|
| 47 |
my %cookies = fetch CGI::Cookie; |
47 |
my %cookies = fetch CGI::Cookie; |
|
Lines 49-57
my %cookies = fetch CGI::Cookie;
Link Here
|
| 49 |
my $auth_failure = 1; |
49 |
my $auth_failure = 1; |
| 50 |
my ($auth_status, $sessionID) = check_cookie_auth($cookies{'CGISESSID'}->value); |
50 |
my ($auth_status, $sessionID) = check_cookie_auth($cookies{'CGISESSID'}->value); |
| 51 |
foreach my $flag_required (@{ $flags_required}) { |
51 |
foreach my $flag_required (@{ $flags_required}) { |
| 52 |
if (my $flags = haspermission(C4::Context->config('user'), $flag_required)) { |
52 |
if (my $flags = haspermission(C4::Context->config('user'), $flag_required)) { |
| 53 |
$auth_failure = 0 if $auth_status eq 'ok'; |
53 |
$auth_failure = 0 if $auth_status eq 'ok'; |
| 54 |
} |
54 |
} |
| 55 |
} |
55 |
} |
| 56 |
|
56 |
|
| 57 |
if ($auth_failure) { |
57 |
if ($auth_failure) { |
| 58 |
- |
|
|