From: Nick Clemens Date: Wed, 13 Mar 2019 05:23:21 +0000 (+0000) Subject: Bug 20128: Problem when checking individual perms where borrower has top level X-Git-Url: http://git.equinoxoli.org/?p=koha-equinox.git;a=commitdiff_plain;h=8f8367c728112178d4831a9776c55d58eb7ef22b Bug 20128: Problem when checking individual perms where borrower has top level Signed-off-by: Katrin Fischer Signed-off-by: Nick Clemens --- diff --git a/t/db_dependent/Auth/haspermission.t b/t/db_dependent/Auth/haspermission.t index 6118ec9..0eb6c3c 100644 --- a/t/db_dependent/Auth/haspermission.t +++ b/t/db_dependent/Auth/haspermission.t @@ -50,6 +50,15 @@ my $borr2 = $builder->build( }, } ); +my $borr3 = $builder->build( + { + source => 'Borrower', + value => { + surname => 'Bor2', + flags => 2**13, # top level tools + }, + } +); $builder->build( { source => 'UserPermission', @@ -150,6 +159,16 @@ subtest 'hashref top level AND tests' => sub { ); is( ref($r), 'HASH', 'Borrower2 (/tools|upload_local_cover_image AND /tools|batch_upload_patron_images) granular' ); $r = haspermission( + $borr3->{userid}, + { + tools => { + 'upload_local_cover_images' => 1, + 'batch_upload_patron_images' => 1 + }, + } + ); + is( ref($r), 'HASH', 'Borrower3 (/tools|upload_local_cover_image AND /tools|batch_upload_patron_images) granular' ); + $r = haspermission( $borr2->{userid}, { tools => {