From 7b8e654288b597d104a188d39316a614c3305726 Mon Sep 17 00:00:00 2001 From: Blou Date: Thu, 22 Sep 2016 10:07:14 -0400 Subject: [PATCH] Bug 17328 - borrowers.flags must be passed an integer. --- C4/Members.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/C4/Members.pm b/C4/Members.pm index 4b2d7ff..47dba42 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -679,6 +679,9 @@ sub AddMember { $data{'debarred'} = undef if ( not $data{'debarred'} ); $data{'sms_provider_id'} = undef if ( not $data{'sms_provider_id'} ); + # assign a valid flags default if none provided + $new_member->{flags} = 0 unless $new_member->{flags}; + # get only the columns of Borrower my @columns = $schema->source('Borrower')->columns; my $new_member = { map { join(' ',@columns) =~ /$_/ ? ( $_ => $data{$_} ) : () } keys(%data) } ; -- 2.1.0