Lines 121-130
if ( $op eq 'cud-move' ) {
Link Here
|
121 |
} |
121 |
} |
122 |
} |
122 |
} |
123 |
elsif ( $op eq 'cud-cancel' ) { |
123 |
elsif ( $op eq 'cud-cancel' ) { |
124 |
my $reserve_id = $input->param('reserve_id'); |
124 |
my $reserve_id = $input->param('reserve_id'); |
125 |
my $cancellation_reason = $input->param("cancellation-reason"); |
125 |
my $cancellation_reason = $input->param("cancellation-reason"); |
126 |
my $hold = Koha::Holds->find($reserve_id); |
126 |
my $hold = Koha::Holds->find($reserve_id); |
127 |
$hold->cancel( { cancellation_reason => $cancellation_reason } ) if $hold; |
127 |
$hold->cancel( { cancellation_reason => $cancellation_reason } ) if $hold; |
128 |
} |
128 |
} |
129 |
elsif ( $op eq 'cud-setLowestPriority' ) { |
129 |
elsif ( $op eq 'cud-setLowestPriority' ) { |
130 |
my $reserve_id = $input->param('reserve_id'); |
130 |
my $reserve_id = $input->param('reserve_id'); |
131 |
- |
|
|