projects
/
gitmo/Mouse.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
2b36fd6
)
Resolve RT #57975: "Exception caught:" prefixes on "re-thrown" exceptions have been...
gfx [Wed, 9 Jun 2010 10:11:40 +0000 (19:11 +0900)]
xs-src/MouseUtil.xs
patch
|
blob
|
blame
|
history
diff --git
a/xs-src/MouseUtil.xs
b/xs-src/MouseUtil.xs
index
925d3d4
..
94000f5
100644
(file)
--- 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;