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

(-)a/C4/VirtualShelves.pm (-2 / +1 lines)
Lines 21-27 use strict; Link Here
21
use warnings;
21
use warnings;
22
22
23
use Carp;
23
use Carp;
24
use C4::Auth;
25
use C4::Context;
24
use C4::Context;
26
use C4::Debug;
25
use C4::Debug;
27
use C4::Members;
26
use C4::Members;
Lines 470-475 sub ShelfPossibleAction { Link Here
470
469
471
    if ( $user > 0 and $action eq 'delete_shelf' ) {
470
    if ( $user > 0 and $action eq 'delete_shelf' ) {
472
        my $borrower = C4::Members::GetMember( borrowernumber => $user );
471
        my $borrower = C4::Members::GetMember( borrowernumber => $user );
472
        require C4::Auth;
473
        return 1
473
        return 1
474
            if C4::Auth::haspermission( $borrower->{userid}, { shelves => 'delete_public_lists' } );
474
            if C4::Auth::haspermission( $borrower->{userid}, { shelves => 'delete_public_lists' } );
475
    }
475
    }
476
- 

Return to bug 13417