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

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-03-06 14:26:17 -0500 (Fri, 06 Mar 2009)
New Revision: 12446

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
Log:
no need for array access on retrieve

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm	2009-03-06 19:18:01 UTC (rev 12445)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm	2009-03-06 19:26:17 UTC (rev 12446)
@@ -862,7 +862,7 @@
 
     my $copy = $e->retrieve_asset_copy([
         $copy_id,
-        {flesh => 1, flesh_fields => {'acp' => ['call_number']}}])->[0] 
+        {flesh => 1, flesh_fields => {'acp' => ['call_number']}}])
             or return $e->die_event;
 
     my $owning_lib =