From: Jesse Luehrs Date: Mon, 27 Sep 2010 20:54:40 +0000 (-0500) Subject: more multiple inheritance fiddling X-Git-Tag: 1.15~25 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=35085ce3c9cab4142494ccd3b2ca498cb0703f17;p=gitmo%2FMoose.git more multiple inheritance fiddling --- diff --git a/lib/Moose/Meta/Method/Meta.pm b/lib/Moose/Meta/Method/Meta.pm index 94170fd..d4af4b8 100644 --- a/lib/Moose/Meta/Method/Meta.pm +++ b/lib/Moose/Meta/Method/Meta.pm @@ -24,6 +24,11 @@ sub wrap { return $class->Class::MOP::Method::Meta::wrap(@_); } +sub _make_compatible_with { + my $self = shift; + return $self->Class::MOP::Method::Meta::_make_compatible_with(@_); +} + 1; __END__