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

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-09-30 16:55:03 -0400 (Wed, 30 Sep 2009)
New Revision: 14240

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
Log:
flesh some data on the patron object returned from a checkin call

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2009-09-30 20:38:49 UTC (rev 14239)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2009-09-30 20:55:03 UTC (rev 14240)
@@ -2492,6 +2492,21 @@
         );
     }
 
+    if($self->patron) {
+        # flesh some patron fields before returning
+        $self->patron(
+            $self->editor->retrieve_actor_user([
+                $self->patron->id,
+                {
+                    flesh => 1,
+                    flesh_fields => {
+                        au => ['card', 'billing_address', 'mailing_address']
+                    }
+                }
+            ])
+        );
+    }
+
     for my $evt (@{$self->events}) {
 
         my $payload         = {};