From 8a29479923534f7d01677e953b813dccd374b3a0 Mon Sep 17 00:00:00 2001 From: doy Date: Fri, 10 Apr 2009 19:13:22 -0500 Subject: todo comment --- lib/MooseX/NonMoose.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lib') 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); -- cgit v1.2.3-54-g00ecf