[Rt-commit] rt branch, 4.0/shredder-save-dollar-at, created. rt-4.0.0rc5-1-g57f2f35

[Alex Vandiver]

The branch, 4.0/shredder-save-dollar-at has been created
        at  57f2f3520e159d11a08cd875d83bb808daa1b307 (commit)

- Log -----------------------------------------------------------------
commit 57f2f3520e159d11a08cd875d83bb808daa1b307
Author: Alex Vandiver <alexmv at bestpractical.com>
Date:   Fri Feb 18 20:35:12 2011 -0500

    Save $@, to ensure that "Dependecies list have reached its limit" warnings, etc, aren't lost

diff --git a/lib/RT/Shredder.pm b/lib/RT/Shredder.pm
index e755e9d..d73db13 100644
--- a/lib/RT/Shredder.pm
+++ b/lib/RT/Shredder.pm
@@ -552,10 +552,11 @@ sub Wipeout
         die "Couldn't commit transaction" unless $RT::Handle->Commit;
     };
     if( $@ ) {
+        my $error = $@;
         $RT::Handle->Rollback('force');
         $self->RollbackDumpTo( Mark => $mark ) if $mark;
-        die $@ if RT::Shredder::Exception::Info->caught;
-        die "Couldn't wipeout object: $@";
+        die $error if RT::Shredder::Exception::Info->caught;
+        die "Couldn't wipeout object: $error";
     }
 }
 

-----------------------------------------------------------------------