From: ivan <ivan>
Date: Fri, 18 Aug 2006 11:56:26 +0000 (+0000)
Subject: pass through the explicitly specified pkeys
X-Git-Tag: BEFORE_RT_3_4_5^2~3
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=aa69b255a6b5abe6117ad864b7521d498a618a3c;p=freeside.git

pass through the explicitly specified pkeys
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 75ad1ef5c..fd66f145c 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -584,7 +584,7 @@ sub _copy_skel {
   
       # don't drink soap!  recurse!  recurse!  okay!
       my $error =
-        _copy_skel( $child_table,
+        _copy_skel( $child_table_def,
                     $row->{$child_pkey}, #sourceid
                     $insertid, #destid
                     %{ $child_tables{$child_table_def} },