oops, want CHILD table for skeleton inserts, not parent

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 2617d10..270c544 100644 (file)
--- 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;