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

(-)a/members/memberentry.pl (-2 / +1 lines)
Lines 234-240 if ( $op eq 'cud-insert' || $op eq 'edit_form' || $op eq 'cud-save' || $op eq 'd Link Here
234 
        qr/^guarantor_surname$/,
 234 
        qr/^guarantor_surname$/,
235 
        qr/^delete_guarantor$/,
 235 
        qr/^delete_guarantor$/,
236 
    );
 236 
    );
237 
    push @keys_to_delete, map { qr/^$_$/ } split( /\s*\|\s*/, C4::Context->preference('BorrowerUnwantedField') || q{} );
 237 
    push @keys_to_delete, map { qr/^$_$/ } grep { $_ ne 'dateexpiry' } split( /\s*\|\s*/, C4::Context->preference('BorrowerUnwantedField') || q{} );
238 
    push @keys_to_delete, qr/^password_expiration_date$/ unless $CanUpdatePasswordExpiration;
 238 
    push @keys_to_delete, qr/^password_expiration_date$/ unless $CanUpdatePasswordExpiration;
239 
    for my $regexp (@keys_to_delete) {
 239 
    for my $regexp (@keys_to_delete) {
240 
        for (keys %newdata) {
 240 
        for (keys %newdata) {
241 
-

Return to bug 36321