|
Lines 196-201
if ( $op eq 'cud-place_reserve' ) {
Link Here
|
| 196 |
|
196 |
|
| 197 |
my @failed_holds; |
197 |
my @failed_holds; |
| 198 |
my @successful_hold_ids; |
198 |
my @successful_hold_ids; |
|
|
199 |
my @successful_holds; |
| 200 |
my $hold_group; |
| 199 |
while (@selectedItems) { |
201 |
while (@selectedItems) { |
| 200 |
my $biblioNum = shift(@selectedItems); |
202 |
my $biblioNum = shift(@selectedItems); |
| 201 |
my $itemNum = shift(@selectedItems); |
203 |
my $itemNum = shift(@selectedItems); |
|
Lines 311-316
if ( $op eq 'cud-place_reserve' ) {
Link Here
|
| 311 |
if ($reserve_id) { |
313 |
if ($reserve_id) { |
| 312 |
++$reserve_cnt; |
314 |
++$reserve_cnt; |
| 313 |
push @successful_hold_ids, $reserve_id; |
315 |
push @successful_hold_ids, $reserve_id; |
|
|
316 |
push @successful_holds, $biblioNum; |
| 314 |
} else { |
317 |
} else { |
| 315 |
push @failed_holds, 'not_placed'; |
318 |
push @failed_holds, 'not_placed'; |
| 316 |
} |
319 |
} |
|
Lines 320-326
if ( $op eq 'cud-place_reserve' ) {
Link Here
|
| 320 |
$patron->create_hold_group( \@successful_hold_ids ) if $add_to_hold_group; |
323 |
$patron->create_hold_group( \@successful_hold_ids ) if $add_to_hold_group; |
| 321 |
|
324 |
|
| 322 |
print $query->redirect( "/cgi-bin/koha/opac-user.pl?" |
325 |
print $query->redirect( "/cgi-bin/koha/opac-user.pl?" |
| 323 |
. ( @failed_holds ? "failed_holds=" . join( '|', @failed_holds ) : q|| ) |
326 |
. ( @failed_holds ? "failed_holds=" . join( '|', @failed_holds ) : q|| ) |
|
|
327 |
. ( @successful_holds ? "successful_holds=" . join( '|', @successful_holds ) : q|| ) |
| 324 |
. "&opac-user-holds=1" ); |
328 |
. "&opac-user-holds=1" ); |
| 325 |
exit; |
329 |
exit; |
| 326 |
} |
330 |
} |