summaryrefslogtreecommitdiffstats
path: root/lib/MooseX/NonMoose.pm
diff options
context:
space:
mode:
authordoy <doy@tozt.net>2009-04-08 02:29:59 -0500
committerdoy <doy@tozt.net>2009-04-08 02:29:59 -0500
commit6571e62aa24c76fecc37dc06b6bbd3388792d02a (patch)
tree988b5b71b4e69435efe2a1a83aca2d8c3f3fb7fb /lib/MooseX/NonMoose.pm
parent6ab7e1eabb1164e8f4e4e31f3ef6c987918ae5d3 (diff)
downloadmoosex-nonmoose-6571e62aa24c76fecc37dc06b6bbd3388792d02a.tar.gz
moosex-nonmoose-6571e62aa24c76fecc37dc06b6bbd3388792d02a.zip
default to inline_constructor => 0 on make_immutable
Diffstat (limited to 'lib/MooseX/NonMoose.pm')
-rw-r--r--lib/MooseX/NonMoose.pm11
1 files changed, 11 insertions, 0 deletions
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;