[Rt-commit] r6723 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Tue Jan  9 15:54:53 2007
New Revision: 6723

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in

Log:
 r4328 at cubic-pc:  cubic | 2007-01-06 23:33:43 +0300
 * force rollback in SIG handler to avoid warnings if no transactions are in progress


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in	Tue Jan  9 15:54:53 2007
@@ -334,7 +334,7 @@
         # if we are not in eval and perl is not parsing code
         # then rollback transactions and log RT error
         unless ($^S || !defined $^S ) {
-            $RT::Handle->Rollback if $RT::Handle;
+            $RT::Handle->Rollback(1) if $RT::Handle;
             $RT::Logger->crit("$_[0]") if $RT::Logger;
         }
         die $_[0];