From 58c62f69c1cabf31840006531338f9362f0a1e0e Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle.m.hall@gmail.com>
Date: Thu, 2 Feb 2012 10:15:43 -0500
Subject: [PATCH] Bug 6490 - Lost and paid not updated when book is checked
 out.

Signed-off-by: Liz Rea <wizzyrea@gmail.com>

Tested:

item checked out and marked lost - item is removed from borrower's checkouts and charged to patron
Checking out the item (without checking it in first) removed the fines and issued the item normally.

Passed prove t xt t/db_dependent (results congruent with current master failures)

Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
---
 C4/Circulation.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/C4/Circulation.pm b/C4/Circulation.pm
index 2bf5d519a0..e68db64a78 100644
--- a/C4/Circulation.pm
+++ b/C4/Circulation.pm
@@ -1025,6 +1025,12 @@ sub AddIssue {
           CartToShelf( $item->{'itemnumber'} );
         }
         $item->{'issues'}++;
+
+        ## If item was lost, it has now been found, reverse any list item charges if neccessary.
+        if ( $item->{'itemlost'} ) {
+            _FixAccountForLostAndReturned( $item->{'itemnumber'}, undef, $item->{'barcode'} );
+        }
+
         ModItem({ issues           => $item->{'issues'},
                   holdingbranch    => C4::Context->userenv->{'branch'},
                   itemlost         => 0,
-- 
2.39.5