Lines 50-55
my $borr2 = $builder->build(
Link Here
|
50 |
}, |
50 |
}, |
51 |
} |
51 |
} |
52 |
); |
52 |
); |
|
|
53 |
my $borr3 = $builder->build( |
54 |
{ |
55 |
source => 'Borrower', |
56 |
value => { |
57 |
surname => 'Bor2', |
58 |
flags => 2**13, # top level tools |
59 |
}, |
60 |
} |
61 |
); |
53 |
$builder->build( |
62 |
$builder->build( |
54 |
{ |
63 |
{ |
55 |
source => 'UserPermission', |
64 |
source => 'UserPermission', |
Lines 150-155
subtest 'hashref top level AND tests' => sub {
Link Here
|
150 |
); |
159 |
); |
151 |
is( ref($r), 'HASH', 'Borrower2 (/tools|upload_local_cover_image AND /tools|batch_upload_patron_images) granular' ); |
160 |
is( ref($r), 'HASH', 'Borrower2 (/tools|upload_local_cover_image AND /tools|batch_upload_patron_images) granular' ); |
152 |
$r = haspermission( |
161 |
$r = haspermission( |
|
|
162 |
$borr3->{userid}, |
163 |
{ |
164 |
tools => { |
165 |
'upload_local_cover_images' => 1, |
166 |
'batch_upload_patron_images' => 1 |
167 |
}, |
168 |
} |
169 |
); |
170 |
is( ref($r), 'HASH', 'Borrower3 (/tools|upload_local_cover_image AND /tools|batch_upload_patron_images) granular' ); |
171 |
$r = haspermission( |
153 |
$borr2->{userid}, |
172 |
$borr2->{userid}, |
154 |
{ |
173 |
{ |
155 |
tools => { |
174 |
tools => { |
156 |
- |
|
|