diff options
Diffstat (limited to 'checksetup.pl')
| -rwxr-xr-x | checksetup.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/checksetup.pl b/checksetup.pl index d0b1764b4..00605415d 100755 --- a/checksetup.pl +++ b/checksetup.pl @@ -1874,7 +1874,8 @@ if(scalar(@isam_tables)) { # 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: |