From: ivan <ivan>
Date: Fri, 18 Aug 2006 10:34:44 +0000 (+0000)
Subject: suggestion to run dbdef-create here, yes...
X-Git-Tag: BEFORE_RT_3_4_5^2~7
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=a5fa93bd476f0f0e2c4ca265dc5a1ab20f7d26dd;p=freeside.git

suggestion to run dbdef-create here, yes...
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 8b0f1b5b4..f7e16cfd3 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -511,7 +511,8 @@ sub _copy_skel {
     my $sequence = '';
     if ( keys %{ $child_tables{$child_table} } ) {
 
-      return "$child_table has no primary key\n" unless $child_pkey;
+      return "$child_table has no primary key".
+             " (or do you need to run dbdef-create?)\n" unless $child_pkey;
 
       #false laziness w/Record::insert and only works on Pg
       #refactor the proper last-inserted-id stuff out of Record::insert if this