From efb255b96d2d8edef18f090c4fcfd844cc467abb Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Wed, 27 Jul 2005 22:07:06 +0000
Subject: [PATCH] returning circ on transiting LOST

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Rules.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Rules.pm
index 94ddf287fa..5931f3e4f2 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Rules.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Rules.pm
@@ -763,20 +763,26 @@ sub transit_receive {
 				my $s = $session->request(
 					"open-ils.storage.direct.asset.copy.update", $copy )->gather(1);
 				if(!$s) {throw OpenSRF::EX::ERROR ("Error updating copy ".$copy->id);} # blah..
-				$apputils->commit_db_session($session);
 
 				my($status, $status_text) = (0, "Transit Complete");
 
+				my $circ;
 				if($transit->copy_status eq "3") { #if copy is lost
 					$status = 2;
 					$status_text = "Copy is marked as LOST";
+					$circ = $session->request(
+						"open-ils.storage.direct.action.circulation.search_where",
+						{ target_copy => $copy->id, xact_finish => undef } )->gather(1);
 				}
 
+				$apputils->commit_db_session($session);
+
 				return { 
 					status => $status, 
 					route_to => $user->home_ou, 
 					text => $status_text, 
 					record => $record, 
+					circ	=> $circ,
 					copy => $copy  };
 
 			} else {
-- 
2.43.2