From 9ccd46714ca294ce869502dd6c325355108dd692 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Wed, 3 Apr 2013 16:21:25 -0400 Subject: [PATCH] Ignore canceled holds during alt-queue generation When zero potential copies exist for a hold, the hold queue stats code determines the size and shape of the queue by finding and sorting holds that have the same type and target. This patch forces the code to ignore canceled holds when looking for similarly-shaped holds. Signed-off-by: Bill Erickson Signed-off-by: Jason Etheridge --- .../src/perlmods/lib/OpenILS/Application/Circ/Holds.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm index 5f95694eac..29d22affc1 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm @@ -1360,7 +1360,13 @@ sub retrieve_hold_queue_status_impl { ], where => { hold_type => $hold->hold_type, - target => $hold->target + target => $hold->target, + capture_time => undef, + cancel_time => undef, + '-or' => [ + {expire_time => undef }, + {expire_time => {'>' => 'now'}} + ] } }); } -- 2.43.2