projects
/
gitmo/Mouse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Use @CARP_NOT instead of %Carp::Internal
[gitmo/Mouse.git]
/
xs-src
/
MouseUtil.xs
diff --git
a/xs-src/MouseUtil.xs
b/xs-src/MouseUtil.xs
index
8704d89
..
d8e3f4c
100644
(file)
--- a/
xs-src/MouseUtil.xs
+++ b/
xs-src/MouseUtil.xs
@@
-108,8
+108,12
@@
mouse_throw_error(SV* const metaobject, SV* const data /* not used */, const cha
PUSHs(metaobject);
mPUSHs(message);
- mPUSHs(newSVpvs("depth"));
- mPUSHi(-1);
+ if(data){ /* extra arg, might be useful for debugging */
+ mPUSHs(newSVpsv("data"));
+ PUSHs(data);
+ mPUSHs(newSVpvs("depth"));
+ mPUSHi(-1);
+ }
PUTBACK;