From bde46a1e81ab59c0068399903c5efe30c9ffc618 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 18 Aug 2006 11:40:34 +0000
Subject: fix the  explicitly specified primary keys

---
 FS/FS/cust_main.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'FS')

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 07b2c1157..e2bc95f70 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -512,7 +512,7 @@ sub _copy_skel {
 
     my $child_table;
     my $child_pkey = '';
-    if ( $child_table =~ /^(\w+)\.(\w+)$/ ) {
+    if ( $child_table_def =~ /^(\w+)\.(\w+)$/ ) {
       ( $child_table, $child_pkey ) = ( $1, $2 );
     } else {
       $child_table = $child_table_def;
-- 
cgit v1.2.1