X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=xs-src%2FMouseUtil.xs;fp=xs-src%2FMouseUtil.xs;h=d8e3f4cf5f59fdd128c3cc74ae2e6364696906e2;hp=8704d89cac03dbbbb7fa85e4afc0b8d86109e4fb;hb=431e4817af5380b349d562cafde91777db982a2a;hpb=81c629ebda18684a5bc69906308113423a7a58b4

diff --git a/xs-src/MouseUtil.xs b/xs-src/MouseUtil.xs
index 8704d89..d8e3f4c 100644
--- 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;