From feafaf45ee709ef15b6cf7892abf89e4878c627b Mon Sep 17 00:00:00 2001 From: ivan Date: Tue, 4 Sep 2001 11:15:58 +0000 Subject: [PATCH] rar --- bin/fs-setup | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/bin/fs-setup b/bin/fs-setup index 1c720e698..5dc666a1e 100755 --- a/bin/fs-setup +++ b/bin/fs-setup @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: fs-setup,v 1.52 2001-09-04 11:15:15 ivan Exp $ +# $Id: fs-setup,v 1.53 2001-09-04 11:15:58 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 $tables{$_}{'columns'}; while (@{$tables{$_}{'columns'}}) { my($name,$type,$null,$length)=splice @{$tables{$_}{'columns'}}, 0, 4; push @columns, new DBIx::DBSchema::Column ( $name,$type,$null,$length ); -- 2.11.0