From b6ff62b62b8502eba4ed701f7610f09db9504aa0 Mon Sep 17 00:00:00 2001 From: erickson Date: Fri, 11 Aug 2006 15:58:38 +0000 Subject: [PATCH] fixed invalid barcode handling bug git-svn-id: svn://svn.open-ils.org/ILS/trunk@5467 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm index b876e8c353..ba657b8a40 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm @@ -161,11 +161,10 @@ sub fetch_user_data { } elsif( $ctx->{patron_barcode} ) { my $card = $e->search_actor_card( - { barcode => $ctx->{patron_barcode} } ) or return $e->event; + { barcode => $ctx->{patron_barcode} } )->[0] or return $e->event; $ctx->{patron} = $e->search_actor_user( - { card => $card->[0]->id }) or return $e->event; - $ctx->{patron} = $ctx->{patron}->[0]; + { card => $card->id })->[0] or return $e->event; } elsif( $ctx->{fetch_patron_by_circ_copy} ) { -- 2.11.0