diff options
-rw-r--r-- | FS/FS/cust_main.pm | 3 |
1 files changed, 2 insertions, 1 deletions
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; |