[open-ils-commits] r15210 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-12-21 14:38:18 -0500 (Mon, 21 Dec 2009)
New Revision: 15210

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
Log:
when an open circ exists during checkout, go ahead and return the copy in the event payload

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2009-12-21 16:46:37 UTC (rev 15209)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2009-12-21 19:38:18 UTC (rev 15210)
@@ -829,11 +829,11 @@
 
         if(my $old_circ = $circs->[0]) { # an open circ was found
 
-            my $payload; # event payload
+            my $payload = {copy => $copy};
 
             if($old_circ->usr == $self->patron->id) {
                 
-                $payload = {old_circ => $old_circ};
+                $payload->{old_circ} = $old_circ;
 
                 # If there is an open circulation on the checkout item and an auto-renew 
                 # interval is defined, inform the caller that they should go