Subject: | [PATCH] debug output not guarded by debug in DBI/PostgreSQL |
--- SQL/Translator/Parser/DBI/PostgreSQL.pm.org 2009-08-18
21:24:40.000000000 +0200
+++ SQL/Translator/Parser/DBI/PostgreSQL.pm 2009-11-30
15:09:22.000000000 +0100
@@ -184,7 +184,7 @@ ORDER BY 1;
$fk_select->execute('public',$table_name) or die "Can't
execute: $@";
my $fkeys = $fk_select->fetchall_arrayref({});
- print Dumper $fkeys;
+ $DEBUG and print STDERR Dumper $fkeys;
for my $con (@$fkeys){
my $con_name = $con->{conname};
my $fields = $con->{fields};