From: justdave%syndicomm.com <>
Date: Sat, 9 Aug 2003 06:06:13 +0000 (+0000)
Subject: Bug 212095: DBD::mysql versions after 2.1026 return the table list quoted, which... 
X-Git-Tag: bugzilla-2.16.4~24
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f4ed511f26d24831ad18c26e900499a1b86be117;p=thirdparty%2Fbugzilla.git

Bug 212095: DBD::mysql versions after 2.1026 return the table list quoted, which broke the existing "table exists" check.
r= jouni, a= justdave
---

diff --git a/checksetup.pl b/checksetup.pl
index b23ca76a6b..7349eabbfc 100755
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -1610,7 +1610,8 @@ $table{tokens} =
 ###########################################################################
 
 # Get a list of the existing tables (if any) in the database
-my @tables = map { $_ =~ s/.*\.//; $_ } $dbh->tables;
+$sth = $dbh->table_info(undef, undef, undef, "TABLE");
+my @tables = @{$dbh->selectcol_arrayref($sth, { Columns => [3] })};
 #print 'Tables: ', join " ", @tables, "\n";
 
 # add lines here if you add more --LOCAL-- config vars that end up in the enums: