no need for array access on retrieve

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12446 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 f18a94a..a1b1958 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -862,7 +862,7 @@ sub mark_item {
 
     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 =