From: ivan Date: Tue, 4 Sep 2001 11:15:15 +0000 (+0000) Subject: much better X-Git-Tag: freeside_1_4_0pre11~371 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=895e5dd0c472e41875435cc625f1ca0a36bd2524;p=freeside.git much better --- diff --git a/bin/fs-setup b/bin/fs-setup index 3d56d9f1f..1c720e698 100755 --- a/bin/fs-setup +++ b/bin/fs-setup @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: fs-setup,v 1.51 2001-09-04 11:14:13 ivan Exp $ +# $Id: fs-setup,v 1.52 2001-09-04 11:15:15 ivan Exp $ #to delay loading dbdef until we're ready BEGIN { $FS::Record::setup_hack = 1; } @@ -79,7 +79,6 @@ my(%tables)=&tables_hash_hack; #turn it into objects my($dbdef) = new DBIx::DBSchema ( map { my(@columns); - warn $_; warn $tables{$_}{'columns'}; while (@{$tables{$_}{'columns'}}) { my($name,$type,$null,$length)=splice @{$tables{$_}{'columns'}}, 0, 4;