simcop2387/DBD-SQLite-SQLcipher
1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 22:28:47 -04:00
Code Issues Releases Wiki Activity

removed debugging code

Browse source
This commit is contained in:
Kenichi Ishigaki 2012-09-12 03:15:32 +00:00
parent fe3e0e3236
commit e2ecdff4a2
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/DBD/SQLite.pm
View file

@ -499,7 +499,7 @@ sub foreign_key_info {
next if defined $fk_table && $fk_table ne '%' && $fk_table ne $tbname; next if defined $fk_table && $fk_table ne '%' && $fk_table ne $tbname;
my $quoted_tbname = $dbh->quote_identifier($tbname); my $quoted_tbname = $dbh->quote_identifier($tbname);
my $sth = $dbh->prepare("PRAGMA $quoted_dbname.foreign_key_list($quoted_tbname)") or die $dbh->errstr; my $sth = $dbh->prepare("PRAGMA $quoted_dbname.foreign_key_list($quoted_tbname)");
$sth->execute; $sth->execute;
while(my $row = $sth->fetchrow_hashref) { while(my $row = $sth->fetchrow_hashref) {
next if defined $pk_table && $pk_table ne '%' && $pk_table ne $row->{table}; next if defined $pk_table && $pk_table ne '%' && $pk_table ne $row->{table};