From: ivan Date: Fri, 18 Aug 2006 10:00:20 +0000 (+0000) Subject: skeleton typo X-Git-Tag: BEFORE_RT_3_4_5^2~13 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=99c0907183fd9fbfb62a9dbd27d72013a95ca64a;p=freeside.git skeleton typo --- diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 270c544ef..a52145b19 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -529,7 +529,7 @@ sub _copy_skel { my $sel_columns = ' ( '. join(', ', @sel_columns ). ' ) '; my @ins_columns = grep { $_ ne $child_pkey } @sel_columns; - my $ins_columns = ' ( ', join(', ', $primary_key, @ins_columns ). ' ) ', + my $ins_columns = ' ( '. join(', ', $primary_key, @ins_columns ). ' ) '; my $placeholders = ' ( ?, '. join(', ', map '?', @ins_columns ). ' ) '; my $sel_sth = dbh->prepare( "SELECT $sel_columns FROM $child_table".