View | Details | Raw Unified | Return to bug 22461
Collapse All | Expand All

(-)a/C4/Auth_with_ldap.pm (-6 / +3 lines)
Lines 223-233 sub checkpw_ldap { Link Here
223
    } elsif ($config{replicate}) { # A2, C2
223
    } elsif ($config{replicate}) { # A2, C2
224
        my @columns = Koha::Patrons->columns;
224
        my @columns = Koha::Patrons->columns;
225
        my $patron = Koha::Patron->new(
225
        my $patron = Koha::Patron->new(
226
            map {
226
            {
227
                grep join( ' ', @columns ) =~ /$_/
227
                map { defined( $borrower{$_} ) ? ( $_ => $borrower{$_} ) : () } @columns
228
                  ? ( $_ => $data{$_} )
228
            }
229
                  : ()
230
            } keys %borrower
231
        )->store;
229
        )->store;
232
        die "Insert of new patron failed" unless $patron;
230
        die "Insert of new patron failed" unless $patron;
233
        $borrowernumber = $patron->borrowernumber;
231
        $borrowernumber = $patron->borrowernumber;
234
- 

Return to bug 22461