From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 18 May 2007 17:03:14 +0000 (+0000)
Subject: forward-porting stable fix to claims return logic
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=9164535ddb8b05db60fa245bcf76a01574390cbe;p=Evergreen.git

forward-porting stable fix to claims return logic


git-svn-id: svn://svn.open-ils.org/ILS/trunk@7333 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index c17c8839fd..c57f9a6ff6 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -416,7 +416,8 @@ sub set_circ_claims_returned {
     my $barcode = $$args{barcode};
     my $backdate = $$args{backdate};
 
-    $logger->info("marking circ for item $barcode as claims returned");
+    $logger->info("marking circ for item $barcode as claims returned".
+        (($backdate) ? " with backdate $backdate" : ''));
 
     my $copy = $e->search_asset_copy({barcode=>$barcode, deleted=>'f'})->[0] 
         or return $e->die_event;
@@ -430,7 +431,6 @@ sub set_circ_claims_returned {
 
     $circ->stop_fines(OILS_STOP_FINES_CLAIMSRETURNED);
 	$circ->stop_fines_time('now') unless $circ->stop_fines_time;
-    $e->update_action_circulation($circ) or return $e->die_event;
 
     if( $backdate ) {
         # make it look like the circ stopped at the cliams returned time
@@ -439,6 +439,7 @@ sub set_circ_claims_returned {
         return $evt if $evt;
     }
 
+    $e->update_action_circulation($circ) or return $e->die_event;
     $e->commit;
     return 1;
 }