Bug 12598: Fix conflict with 17829 - GetMember
authorJonathan Druart <jonathan.druart@bugs.koha-community.org>
Tue, 25 Jul 2017 13:10:54 +0000 (10:10 -0300)
committerJonathan Druart <jonathan.druart@bugs.koha-community.org>
Fri, 16 Feb 2018 16:57:58 +0000 (13:57 -0300)
Signed-off-by: Colin Campbell <colin.campbell@ptfs-europe.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Koha/Patrons/Import.pm

index 10173bb..965db66 100644 (file)
@@ -163,10 +163,7 @@ sub import_patrons {
         my $borrowernumber;
         my $member;
         if ( defined($matchpoint) && ( $matchpoint eq 'cardnumber' ) && ( $borrower{'cardnumber'} ) ) {
-            $member = GetMember( 'cardnumber' => $borrower{'cardnumber'} );
-            if ($member) {
-                $borrowernumber = $member->{'borrowernumber'};
-            }
+            $member = Koha::Patrons->find( { cardnumber => $borrower{'cardnumber'} } );
         }
         elsif ($extended) {
             if ( defined($matchpoint_attr_type) ) {
@@ -180,6 +177,13 @@ sub import_patrons {
             }
         }
 
+        if ($member) {
+            $member = $member->unblessed;
+            $borrowernumber = $member->{'borrowernumber'};
+        } else {
+            $member = {};
+        }
+
         if ( C4::Members::checkcardnumber( $borrower{cardnumber}, $borrowernumber ) ) {
             push @errors,
               {