X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FUtil.pm;h=783f24a169c7d18541c9058defdafbc9b1b69f66;hp=c3f1f39f01728e90017e6f9ee7dabeaa074e76eb;hb=923a04ba4adf1b79269e749b6bafba309be6335a;hpb=b4d1723ead47f05198e369a2d38ba9e4a3a59354 diff --git a/lib/Mouse/Util.pm b/lib/Mouse/Util.pm index c3f1f39..783f24a 100644 --- a/lib/Mouse/Util.pm +++ b/lib/Mouse/Util.pm @@ -52,9 +52,9 @@ BEGIN{ $xs = eval sprintf("#line %d %s\n", __LINE__, $hack_mouse_file) . q{ require XSLoader; XSLoader::load('Mouse', $VERSION); - - *Mouse::Meta::Method::Constructor::XS::meta = \&meta; - *Mouse::Meta::Method::Destructor::XS::meta = \&meta; + Mouse::Util->import({ into => 'Mouse::Meta::Method::Constructor::XS' }, ':meta'); + Mouse::Util->import({ into => 'Mouse::Meta::Method::Destructor::XS' }, ':meta'); + return 1; }; #warn $@ if $@; }