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

(-)a/C4/Auth_with_ldap.pm (-1 / +9 lines)
Lines 339-345 sub update_local { Link Here
339
    my $borrowerid = shift or croak "No borrowerid";
339
    my $borrowerid = shift or croak "No borrowerid";
340
    my $borrower   = shift or croak "No borrower record";
340
    my $borrower   = shift or croak "No borrower record";
341
341
342
    # skip extended patron attributes in 'borrowers' attribute update
342
    my @keys = keys %$borrower;
343
    my @keys = keys %$borrower;
344
    if (C4::Context->preference('ExtendedPatronAttributes')) {
345
        foreach my $attribute_type ( C4::Members::AttributeTypes::GetAttributeTypes() ) {
346
           my $code = $attribute_type->{code};
347
           @keys = grep { $_ ne $code } @keys;
348
           $debug and printf STDERR "ignoring extended patron attribute '%s' in update_local()\n", $code;
349
        }
350
    }
351
343
    my $dbh = C4::Context->dbh;
352
    my $dbh = C4::Context->dbh;
344
    my $query = "UPDATE  borrowers\nSET     " .
353
    my $query = "UPDATE  borrowers\nSET     " .
345
        join(',', map {"$_=?"} @keys) .
354
        join(',', map {"$_=?"} @keys) .
346
- 

Return to bug 14625