summaryrefslogtreecommitdiffstats
path: root/lib/MooseX/NonMoose.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/MooseX/NonMoose.pm')
-rw-r--r--lib/MooseX/NonMoose.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm
index 926dc69..383c793 100644
--- a/lib/MooseX/NonMoose.pm
+++ b/lib/MooseX/NonMoose.pm
@@ -16,6 +16,9 @@ sub extends_nonmoose {
Moose::extends($caller, @superclasses);
my $caller_meta = Class::MOP::Class->initialize($caller);
+ # XXX: this doesn't need to be installed for every class, just for the
+ # classes directly below ones with custom constructors... how can we do
+ # this?
$caller_meta->add_method(new => sub {
my $class = shift;
my $meta = Class::MOP::Class->initialize($class);