Author: timbo
Date: Wed Sep  2 03:13:15 2009
New Revision: 13257

Modified:
   dbi/trunk/Changes
   dbi/trunk/Driver.xst

Log:
Partially revert r13151 as it was incomplete and needs more work


Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes   (original)
+++ dbi/trunk/Changes   Wed Sep  2 03:13:15 2009
@@ -8,6 +8,7 @@
 
 =head2 Changes in DBI 1.611 (svn rXXX)
 
+XXX needs to be redone to convert ReadOnly to an internal flag:
   Changed "Issuing rollback() due to DESTROY without explicit disconnect"
     warning to not be issued if ReadOnly set for that dbh.
   Bumped required perl version to 5.8.1 (as announced in DBI 1.607)

Modified: dbi/trunk/Driver.xst
==============================================================================
--- dbi/trunk/Driver.xst        (original)
+++ dbi/trunk/Driver.xst        Wed Sep  2 03:13:15 2009
@@ -369,7 +369,7 @@
                 */
                 if (DBIc_WARN(imp_dbh) /* only warn if likely to be useful... 
*/
                 &&  DBIc_is(imp_dbh, DBIcf_Executed) /* has not just called 
commit/rollback */
-                && !DBIc_is(imp_dbh, DBIcf_ReadOnly) /* is not read only */
+            /*  && !DBIc_is(imp_dbh, DBIcf_ReadOnly) -- is not read only */
                 && (!dirty || DBIc_DBISTATE(imp_dbh)->debug >= 3)
                 ) {
                     warn("Issuing rollback() due to DESTROY without explicit 
disconnect() of %s handle %s",

Reply via email to