From: ivan <ivan>
Date: Fri, 18 Aug 2006 09:58:11 +0000 (+0000)
Subject: oops, want CHILD table for skeleton inserts, not parent
X-Git-Tag: BEFORE_RT_3_4_5^2~14
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=7bac56be80a6323073566c6e3c0d87c90801036b;p=freeside.git

oops, want CHILD table for skeleton inserts, not parent
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 2617d10b0..270c544ef 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -524,7 +524,8 @@ sub _copy_skel {
 
     }
   
-    my @sel_columns = grep { $_ ne $primary_key } dbdef->table($table)->columns;
+    my @sel_columns = grep { $_ ne $primary_key }
+                           dbdef->table($child_table)->columns;
     my $sel_columns = ' ( '. join(', ', @sel_columns ). ' ) ';
 
     my @ins_columns = grep { $_ ne $child_pkey } @sel_columns;