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

(-)a/opac/opac-addbybiblionumber.pl (-1 / +1 lines)
Lines 61-67 if ( $op && $op !~ /^cud-/ ) { Link Here
61
} elsif ($newvirtualshelf) {
61
} elsif ($newvirtualshelf) {
62
    if (
62
    if (
63
        $loggedinuser > 0
63
        $loggedinuser > 0
64
        and ( !$public
64
        and ( !$public && C4::Context->preference('OpacAllowPrivateListCreation')
65
            or $public and $loggedinuser > 0 && C4::Context->preference('OpacAllowPublicListCreation') )
65
            or $public and $loggedinuser > 0 && C4::Context->preference('OpacAllowPublicListCreation') )
66
        )
66
        )
67
    {
67
    {
(-)a/opac/opac-shelves.pl (-1 / +6 lines)
Lines 121-126 if ( $op eq 'add_form' ) { Link Here
121
    if ($loggedinuser) {
121
    if ($loggedinuser) {
122
        my $allow_changes_from = $query->param('allow_changes_from');
122
        my $allow_changes_from = $query->param('allow_changes_from');
123
        eval {
123
        eval {
124
            if ( $public && !C4::Context->preference('OpacAllowPublicListCreation') ) {
125
                die "Public list creation is not authorized\n";
126
            } elsif ( !$public && !C4::Context->preference('OpacAllowPrivateListCreation') ) {
127
                die "Private list creation is not authorized\n";
128
            }
129
124
            $shelf = Koha::Virtualshelf->new(
130
            $shelf = Koha::Virtualshelf->new(
125
                {
131
                {
126
                    shelfname                         => scalar $query->param('shelfname'),
132
                    shelfname                         => scalar $query->param('shelfname'),
127
- 

Return to bug 39372