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

(-)a/C4/Members.pm (-1 / +3 lines)
Lines 670-675 sub ModMember { Link Here
670
    my $new_borrower = { map { join(' ', @columns) =~ /$_/ ? ( $_ => $data{$_} ) : () } keys(%data) };
670
    my $new_borrower = { map { join(' ', @columns) =~ /$_/ ? ( $_ => $data{$_} ) : () } keys(%data) };
671
    delete $new_borrower->{flags};
671
    delete $new_borrower->{flags};
672
672
673
    $new_borrower->{dateofbirth}  ||= undef if exists $new_borrower->{dateofbirth};
674
    $new_borrower->{dateenrolled} ||= undef if exists $new_borrower->{dateenrolled};
675
    $new_borrower->{dateexpiry}   ||= undef if exists $new_borrower->{dateexpiry};
673
    my $rs = $schema->resultset('Borrower')->search({
676
    my $rs = $schema->resultset('Borrower')->search({
674
        borrowernumber => $new_borrower->{borrowernumber},
677
        borrowernumber => $new_borrower->{borrowernumber},
675
     });
678
     });
676
- 

Return to bug 12633