View | Details | Raw Unified | Return to bug 20128
Collapse All | Expand All

(-)a/t/db_dependent/Auth/haspermission.t (-1 / +19 lines)
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
- 

Return to bug 20128