From 6a8899390ce1cf27a231d4998ba0903bc891c58e Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Tue, 13 Nov 2007 19:02:35 -0600 Subject: [PATCH] Members.pm: 1 stupid change (whitespace) and 1 real one (comma -- changes the number of args). Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- C4/Members.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/C4/Members.pm b/C4/Members.pm index 38d228fdbd..00d43415ed 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -668,9 +668,9 @@ sub AddMember { my $dbh = C4::Context->dbh; $data{'userid'} = '' unless $data{'password'}; $data{'password'} = md5_base64( $data{'password'} ) if $data{'password'}; - $data{'dateofbirth'} = format_date_in_iso( $data{'dateofbirth'} ); - $data{'dateenrolled'} = format_date_in_iso( $data{'dateenrolled'} ); - $data{'dateexpiry'} = format_date_in_iso( $data{'dateexpiry'} ); + $data{'dateofbirth'} = format_date_in_iso( $data{'dateofbirth'} ); + $data{'dateenrolled'} = format_date_in_iso( $data{'dateenrolled'}); + $data{'dateexpiry'} = format_date_in_iso( $data{'dateexpiry'} ); my $query = "insert into borrowers set cardnumber=" . $dbh->quote( $data{'cardnumber'} ) @@ -733,7 +733,7 @@ sub AddMember { . ",B_phone=" . $dbh->quote( $data{'B_phone'} ) . ",B_email=" - . $dbh->quote( $data{'B_email'}, ) + . $dbh->quote( $data{'B_email'} ) . ",password=" . $dbh->quote( $data{'password'} ) . ",userid=" -- 2.39.5