From 6b5192d4b066785348c12f390dfb07293da8918e Mon Sep 17 00:00:00 2001 From: Blou Date: Thu, 22 Sep 2016 10:32:37 -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..01812f0 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 + $data{flags} = 0 unless $data{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