X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=xs-src%2FMouse.xs;h=8cab3104e61f669801120d95f67057d1de379c65;hp=5fca14f39f6c7e3d7771f5a4d4c0f112f4102bad;hb=24d5564d35368c23c59724fdfa05d9425748bfa0;hpb=e78cd29d5fc15e8772735b0e4691549dd685d689 diff --git a/xs-src/Mouse.xs b/xs-src/Mouse.xs index 5fca14f..8cab310 100644 --- a/xs-src/Mouse.xs +++ b/xs-src/Mouse.xs @@ -403,8 +403,8 @@ CODE: SV* sv = code_ref; /* used in tryAMAGICunDEREF */ SV** sp = &sv; /* used in tryAMAGICunDEREF */ tryAMAGICunDEREF(to_cv); /* try \&{$code} */ - if(SvROK(sv) && SvTYPE(SvRV(sv)) == SVt_PVCV){ - mouse_throw_error(self, NULL, "Not a CODE reference"); + if(!(SvROK(sv) && SvTYPE(SvRV(sv)) == SVt_PVCV)){ + mouse_throw_error(self, NULL, "You must pass a CODE reference to add_method"); } code_ref = sv; }