Author: mjevans
Date: Wed Nov 30 03:06:32 2011
New Revision: 15023

Modified:
   dbi/branches/sqlengine/Changes
   dbi/branches/sqlengine/lib/DBI/DBD/SqlEngine.pm

Log:
Fix rt72343 - NAMES => NAME in default table_info and removed unnecessary kludge


Modified: dbi/branches/sqlengine/Changes
==============================================================================
--- dbi/branches/sqlengine/Changes      (original)
+++ dbi/branches/sqlengine/Changes      Wed Nov 30 03:06:32 2011
@@ -15,6 +15,8 @@
   Fixed sql_type_cast example and typo in errors (Martin J. Evans)
   Fixed parameter-count check for complicated statements using
     DBI::DBD::SqlEngine + SQL::Statement::Param (H.Merijn Brand)
+  Fixed default table_info in DBI::DBD::SqlEngine which passed NAMES
+    attribute instead of NAME to DBD::Sponge RT72343 (Martin J. Evans)
 
   Enhanced and standardized driver trace level mechanism (Tim Bunce)
   Removed old code that was an inneffective attempt to detect

Modified: dbi/branches/sqlengine/lib/DBI/DBD/SqlEngine.pm
==============================================================================
--- dbi/branches/sqlengine/lib/DBI/DBD/SqlEngine.pm     (original)
+++ dbi/branches/sqlengine/lib/DBI/DBD/SqlEngine.pm     Wed Nov 30 03:06:32 2011
@@ -662,14 +662,14 @@
         my @tables = $dbh->func("get_avail_tables");
 
         # Temporary kludge: DBD::Sponge dies if @tables is empty. :-(
-        @tables or return;
+        # this no longer seems to be true @tables or return;
 
         my $dbh2 = $dbh->func("sql_sponge_driver");
         my $sth = $dbh2->prepare(
                                   "TABLE_INFO",
                                   {
                                      rows  => \@tables,
-                                     NAMES => $names,
+                                     NAME => $names,
                                   }
                                 );
         $sth or $dbh->set_err( $DBI::stderr, $dbh2->errstr );

Reply via email to