Add tiny tweaks stolen from Class::XSAccessor 1.07

[gitmo/Mouse.git] / mouse.h

diff --git a/mouse.h b/mouse.h
index 2c57da0..b4f63ec 100644 (file)
--- a/mouse.h
+++ b/mouse.h
@@ -4,7 +4,9 @@
 #define PERL_NO_GET_CONTEXT
 #include <EXTERN.h>
 #include <perl.h>
+#define PERL_CORE
 #include <XSUB.h>
+#undef PERL_CORE
 
 #include "ppport.h"