projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
7bac56b
)
skeleton typo
author
ivan
<ivan>
Fri, 18 Aug 2006 10:00:20 +0000
(10:00 +0000)
committer
ivan
<ivan>
Fri, 18 Aug 2006 10:00:20 +0000
(10:00 +0000)
FS/FS/cust_main.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
270c544
..
a52145b
100644
(file)
--- 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 $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".
my $placeholders = ' ( ?, '. join(', ', map '?', @ins_columns ). ' ) ';
my $sel_sth = dbh->prepare( "SELECT $sel_columns FROM $child_table".