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

(-)a/circ/pendingreserves.pl (-3 / +2 lines)
Lines 47-53 my ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here
47
        query         => $input,
47
        query         => $input,
48
        type          => "intranet",
48
        type          => "intranet",
49
        flagsrequired => { circulate => "circulate_remaining_permissions" },
49
        flagsrequired => { circulate => "circulate_remaining_permissions" },
50
    }
50
}
51
);
51
);
52
52
53
my @messages;
53
my @messages;
Lines 58-64 if ( $op eq 'cud-cancel_reserve' and $reserve_id ) { Link Here
58
        $hold->cancel( { cancellation_reason => $cancellation_reason } );
58
        $hold->cancel( { cancellation_reason => $cancellation_reason } );
59
        push @messages, { type => 'message', code => 'hold_cancelled' };
59
        push @messages, { type => 'message', code => 'hold_cancelled' };
60
    }
60
    }
61
} elsif ( $op =~ m|^mark_as_lost| ) {
61
} elsif ( $op eq 'cud-mark_as_lost' or $op eq 'cud-mark_as_lost_and_notify' ) {
62
    my $hold = Koha::Holds->find($reserve_id);
62
    my $hold = Koha::Holds->find($reserve_id);
63
    die "wrong reserve_id" unless $hold;    # This is a bit rude, but we are not supposed to get a wrong reserve_id
63
    die "wrong reserve_id" unless $hold;    # This is a bit rude, but we are not supposed to get a wrong reserve_id
64
    my $item = $hold->item;
64
    my $item = $hold->item;
65
- 

Return to bug 40515