DBConnect Caching: rollback nur bei Handles ohne AutoCommit

Beseitigt die nervigen Warnungen im Log

diff --git a/SL/DBConnect/Cache.pm b/SL/DBConnect/Cache.pm
index e45965f..7e4633b 100644 (file)
--- a/SL/DBConnect/Cache.pm
+++ b/SL/DBConnect/Cache.pm
@@ -36,7 +36,7 @@ sub reset {
 }
 
 sub reset_all {
-  $_->rollback for values %cache;
+  $_->{AutoCommit} || $_->rollback for values %cache;
 }
 
 sub clear {