diff options
author | doy <doy@tozt.net> | 2009-04-10 19:13:22 -0500 |
---|---|---|
committer | doy <doy@tozt.net> | 2009-04-10 19:13:22 -0500 |
commit | 8a29479923534f7d01677e953b813dccd374b3a0 (patch) | |
tree | e1893a0c8f70a42bb5c7ecd84551b6f65ab510b2 /lib | |
parent | f51bf4fadf61e71c669a48ee46380661e9ee2a95 (diff) | |
download | moosex-nonmoose-8a29479923534f7d01677e953b813dccd374b3a0.tar.gz moosex-nonmoose-8a29479923534f7d01677e953b813dccd374b3a0.zip |
todo comment
Diffstat (limited to 'lib')
-rw-r--r-- | lib/MooseX/NonMoose.pm | 3 |
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); |