From: gfx <gfuji@cpan.org>
Date: Wed, 9 Jun 2010 10:11:40 +0000 (+0900)
Subject: Resolve RT #57975: "Exception caught:" prefixes on "re-thrown" exceptions have been... 
X-Git-Tag: 0.60~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f07982df4265199fe2c562f8dca48abd707461dd;p=gitmo%2FMouse.git

Resolve RT #57975: "Exception caught:" prefixes on "re-thrown" exceptions have been removed
---

diff --git a/xs-src/MouseUtil.xs b/xs-src/MouseUtil.xs
index 925d3d4..94000f5 100644
--- a/xs-src/MouseUtil.xs
+++ b/xs-src/MouseUtil.xs
@@ -161,7 +161,8 @@ mouse_call_sv_safe(pTHX_ SV* const sv, I32 const flags) {
         if(sv_true(ERRSV)){
             SV* const err = sv_mortalcopy(ERRSV);
             LEAVE;
-            croak("Exception caught: %"SVf, err); /* rethrow */
+            sv_setsv(ERRSV, err);
+            croak(NULL); /* rethrow */
         }
 
         LEAVE;