From 69d66829c49fc9bcb71f0678f60bdc6ce3e53d5e Mon Sep 17 00:00:00 2001 From: Thomas Berezansky Date: Wed, 15 Oct 2014 11:32:58 -0400 Subject: [PATCH] Ensure "Reshelved" copies are still reshelving Rather than "were reshelving when the query started" Signed-off-by: Thomas Berezansky --- .../src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm index 120e7a6ce0..d2b34b8b0f 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm @@ -226,6 +226,7 @@ sub complete_reshelving { WHERE cp.status = 7 AND cp.status_changed_time < NOW() - CAST( COALESCE( BTRIM( (SELECT value FROM actor.org_unit_ancestor_setting('circ.reshelving_complete.interval', cp.circ_lib)),'"' ), ? ) AS INTERVAL) ) + AND status = 7 SQL my $sth = action::circulation->db_Main->prepare_cached($sql); $sth->execute($window); -- 2.11.0