From 6571e62aa24c76fecc37dc06b6bbd3388792d02a Mon Sep 17 00:00:00 2001 From: doy Date: Wed, 8 Apr 2009 02:29:59 -0500 Subject: default to inline_constructor => 0 on make_immutable --- lib/MooseX/NonMoose.pm | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'lib/MooseX/NonMoose.pm') diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm index bebf6ee..797bf5b 100644 --- a/lib/MooseX/NonMoose.pm +++ b/lib/MooseX/NonMoose.pm @@ -33,4 +33,15 @@ sub extends_nonmoose { }); } +sub init_meta { + shift; + my %options = @_; + Moose->init_meta(%options); + Moose::Util::MetaRole::apply_metaclass_roles( + for_class => $options{for_class}, + metaclass_roles => ['MooseX::NonMoose::Meta::Role::Class'], + ); + return $options{for_class}->meta; +} + 1; -- cgit v1.2.3-54-g00ecf