From 6d862675246804270e99ea92f147508c7b6cc709 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Sat, 19 Aug 2006 15:15:38 +0000
Subject: [PATCH] reseting holds on mark missing/damaged

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5600 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Circ.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index 12cca53ee0..8311c01623 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -781,7 +781,20 @@ sub mark_item {
 
 	$e->update_asset_copy($copy) or return $e->event;
 
+
+	my $holds = $e->search_action_hold_request(
+		{ 
+			current_copy => $copy->id,
+			fulfillment_time => undef,
+			cancel_time => undef,
+		}
+	);
+
 	$e->commit;
+
+	$logger->debug("reseting holds that target the marked copy");
+	OpenILS::Application::Circ::Holds->_reset_hold($e->requestor, $_) for @$holds;
+
 	return 1;
 }
 
-- 
2.11.0