From fbc86fcc1a7ae705a7ccf2fed7fdc837ed27f07d Mon Sep 17 00:00:00 2001 From: Josef Moravec Date: Tue, 22 Aug 2017 08:58:11 +0000 Subject: [PATCH] Bug 19116: Hold not set to waiting after transfer Test plan: 0) Do not apply the patch 1) Place hold on item from another branch 2) Switch to that branch 3) Check them in at the other branch to set them into transport status (T) 4) Switch back to your homebranch 5) Check items in again, use the different confirm buttons and compare: Only "confirm and print" will be set to waiting, "confirm" remains in transport. 6) Apply the patch 7) Repeat 1-5 - now should work as expected - the hold is marked waiting on "confirm" button too 8) Check the hold from the same branch, to make sure this doesn't add regression --- C4/Reserves.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/C4/Reserves.pm b/C4/Reserves.pm index 5098230..6e7b281 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -807,7 +807,11 @@ sub CheckReserves { my $priority = 10000000; foreach my $res (@reserves) { if ( $res->{'itemnumber'} == $itemnumber && $res->{'priority'} == 0) { - return ( "Waiting", $res, \@reserves ); # Found it + if ($res->{'found'} eq 'W') { + return ( "Waiting", $res, \@reserves ); # Found it, it is waiting + } else { + return ( "Reserved", $res, \@reserves ); # Found determinated hold, e. g. the tranferred one + } } else { my $patron; my $iteminfo; -- 2.1.4