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 465-470 sub ShelfPossibleAction { Link Here
465
464
466
    if ( $user > 0 and $action eq 'delete_shelf' ) {
465
    if ( $user > 0 and $action eq 'delete_shelf' ) {
467
        my $borrower = C4::Members::GetMember( borrowernumber => $user );
466
        my $borrower = C4::Members::GetMember( borrowernumber => $user );
467
        require C4::Auth;
468
        return 1
468
        return 1
469
            if C4::Auth::haspermission( $borrower->{userid}, { shelves => 'delete_public_lists' } );
469
            if C4::Auth::haspermission( $borrower->{userid}, { shelves => 'delete_public_lists' } );
470
    }
470
    }
471
- 

Return to bug 13417