From: Justin Hunter Date: Sun, 21 Jun 2009 14:15:28 +0000 (-0700) Subject: remove debug X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c2959af9efc92f47d100a137b2604deba1ad7d2c;p=dbsrgits%2FSQL-Translator-2.0-ish.git remove debug --- diff --git a/lib/SQL/Translator/Parser/DBI/Dialect.pm b/lib/SQL/Translator/Parser/DBI/Dialect.pm index dbf7391..64952a1 100644 --- a/lib/SQL/Translator/Parser/DBI/Dialect.pm +++ b/lib/SQL/Translator/Parser/DBI/Dialect.pm @@ -77,10 +77,8 @@ sub _table_pk_info { s/\Q$quoter\E//g for @primary; my $sth = $dbh->primary_key_info('', $self->schema->name, $table); - use Data::Dumper; while ( my $info = $sth->fetchrow_hashref() ) { # my $column = SQL::Translator::Object::Column->new( { name => $info->{COLUMN_NAME}, size => undef, data_type => $info->{ - print Dumper($info); } return \@primary;