[Rt-commit] r3501 - in rt/branches/3.4-RELEASE: . lib/RT

[alexmv at bestpractical.com]

Author: alexmv
Date: Mon Jul 18 15:00:38 2005
New Revision: 3501

Modified:
   rt/branches/3.4-RELEASE/   (props changed)
   rt/branches/3.4-RELEASE/lib/RT/Ticket_Overlay.pm
Log:
 r5198 at zoq-fot-pik:  chmrr | 2005-07-18 14:59:07 -0400
  * Fix TransactionBatch / DESTROY bug (backport from QUEBEC)


Modified: rt/branches/3.4-RELEASE/lib/RT/Ticket_Overlay.pm
==============================================================================
--- rt/branches/3.4-RELEASE/lib/RT/Ticket_Overlay.pm	(original)
+++ rt/branches/3.4-RELEASE/lib/RT/Ticket_Overlay.pm	Mon Jul 18 15:00:38 2005
@@ -3378,6 +3378,11 @@
 sub DESTROY {
     my $self = shift;
 
+    # DESTROY methods need to localize $@, or it may unset it.  This
+    # causes $m->abort to not bubble all of the way up.  See perlbug
+    # http://rt.perl.org/rt3/Ticket/Display.html?id=17650
+    local $@;
+
     # The following line eliminates reentrancy.
     # It protects against the fact that perl doesn't deal gracefully
     # when an object's refcount is changed in its destructor.