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

(-)a/C4/Members.pm (-1 / +2 lines)
Lines 590-595 sub ModMember { Link Here
590
    $new_borrower->{dateexpiry}      ||= undef if exists $new_borrower->{dateexpiry};
590
    $new_borrower->{dateexpiry}      ||= undef if exists $new_borrower->{dateexpiry};
591
    $new_borrower->{debarred}        ||= undef if exists $new_borrower->{debarred};
591
    $new_borrower->{debarred}        ||= undef if exists $new_borrower->{debarred};
592
    $new_borrower->{sms_provider_id} ||= undef if exists $new_borrower->{sms_provider_id};
592
    $new_borrower->{sms_provider_id} ||= undef if exists $new_borrower->{sms_provider_id};
593
    $new_borrower->{guarantorid}     ||= undef if exists $new_borrower->{guarantorid};
593
594
594
    my $rs = $schema->resultset('Borrower')->search({
595
    my $rs = $schema->resultset('Borrower')->search({
595
        borrowernumber => $new_borrower->{borrowernumber},
596
        borrowernumber => $new_borrower->{borrowernumber},
Lines 685-690 sub AddMember { Link Here
685
    $data{'dateofbirth'}     = undef if ( not $data{'dateofbirth'} );
686
    $data{'dateofbirth'}     = undef if ( not $data{'dateofbirth'} );
686
    $data{'debarred'}        = undef if ( not $data{'debarred'} );
687
    $data{'debarred'}        = undef if ( not $data{'debarred'} );
687
    $data{'sms_provider_id'} = undef if ( not $data{'sms_provider_id'} );
688
    $data{'sms_provider_id'} = undef if ( not $data{'sms_provider_id'} );
689
    $data{'guarantorid'}     = undef if ( not $data{'guarantorid'} );
688
690
689
    # get only the columns of Borrower
691
    # get only the columns of Borrower
690
    my @columns = $schema->source('Borrower')->columns;
692
    my @columns = $schema->source('Borrower')->columns;
691
- 

Return to bug 17257