|
Lines 56-62
my @messages;
Link Here
|
| 56 |
if ( $op eq 'cancel_reserve' and $reserve_id ) { |
56 |
if ( $op eq 'cancel_reserve' and $reserve_id ) { |
| 57 |
my $hold = Koha::Holds->find( $reserve_id ); |
57 |
my $hold = Koha::Holds->find( $reserve_id ); |
| 58 |
if ( $hold ) { |
58 |
if ( $hold ) { |
| 59 |
my $cancellation_reason = $input->param('cancellation-reasion'); |
59 |
my $cancellation_reason = $input->param('cancellation-reason'); |
| 60 |
$hold->cancel({ cancellation_reason => $cancellation_reason }); |
60 |
$hold->cancel({ cancellation_reason => $cancellation_reason }); |
| 61 |
push @messages, { type => 'message', code => 'hold_cancelled' }; |
61 |
push @messages, { type => 'message', code => 'hold_cancelled' }; |
| 62 |
} |
62 |
} |
| 63 |
- |
|
|