followup - make barcode_to_borrowernumber() work as named
authorGalen Charlton <galen.charlton@liblime.com>
Tue, 14 Oct 2008 18:10:28 +0000 (13:10 -0500)
committerGalen Charlton <galen.charlton@liblime.com>
Tue, 14 Oct 2008 18:10:57 +0000 (13:10 -0500)
Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
C4/SIP/ILS/Item.pm

index 2107458..5afcf1d 100644 (file)
@@ -237,8 +237,8 @@ sub available {
 sub barcode_to_borrowernumber ($) {
     my $known = shift;
     (defined($known)) or return undef;
-    my $member = GetMember($known) or return undef; # borrowernumber is default type for GetMember lookup
-    return $member->{cardnumber};
+    my $member = GetMember($known, 'cardnumber') or return undef; # borrowernumber is default type for GetMember lookup
+    return $member->{borrowernumber};
 }
 sub barcode_is_borrowernumber ($$$) {    # because hold_queue only has borrowernumber...
     my $self = shift;   # not really used