diff options
| author | doy <doy@tozt.net> | 2009-04-17 20:02:01 -0500 |
|---|---|---|
| committer | doy <doy@tozt.net> | 2009-04-17 20:02:01 -0500 |
| commit | 5581d01f2ce7e1ebc3a80b763abc6971e23560be (patch) | |
| tree | a783d1d8a22f6d1c6c332df30e28c63d6fd6e863 /lib/MooseX/NonMoose | |
| parent | 65bbfc7ffbe2f8e73fe8abe34ed4bda0e4cb0616 (diff) | |
| download | moosex-nonmoose-5581d01f2ce7e1ebc3a80b763abc6971e23560be.tar.gz moosex-nonmoose-5581d01f2ce7e1ebc3a80b763abc6971e23560be.zip | |
todo comment
Diffstat (limited to 'lib/MooseX/NonMoose')
| -rw-r--r-- | lib/MooseX/NonMoose/Meta/Role/Class.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/MooseX/NonMoose/Meta/Role/Class.pm b/lib/MooseX/NonMoose/Meta/Role/Class.pm index b27091a..cef62d6 100644 --- a/lib/MooseX/NonMoose/Meta/Role/Class.pm +++ b/lib/MooseX/NonMoose/Meta/Role/Class.pm @@ -48,6 +48,7 @@ around superclasses => sub { # if the constructor we're inheriting is an inlined version of the # default moose constructor, don't do anything either + # XXX: wrong if the class overrode new manually? return @ret if $constructor_class_meta->name eq 'Moose::Meta::Method::Constructor'; } |