From: Yuval Kogman Date: Mon, 10 Dec 2007 12:47:57 +0000 (+0000) Subject: Constructor and Destructor inherit Class::MOP::Method::Generated X-Git-Tag: 0_33~6 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=badb7e899250bf9a36350d84b5002e2cd4053523;p=gitmo%2FMoose.git Constructor and Destructor inherit Class::MOP::Method::Generated --- diff --git a/lib/Moose/Meta/Method/Constructor.pm b/lib/Moose/Meta/Method/Constructor.pm index 337051e..ae65438 100644 --- a/lib/Moose/Meta/Method/Constructor.pm +++ b/lib/Moose/Meta/Method/Constructor.pm @@ -10,7 +10,8 @@ use Scalar::Util 'blessed', 'weaken', 'looks_like_number'; our $VERSION = '0.03'; our $AUTHORITY = 'cpan:STEVAN'; -use base 'Moose::Meta::Method'; +use base 'Moose::Meta::Method', + 'Class::MOP::Method::Generated'; sub new { my $class = shift; diff --git a/lib/Moose/Meta/Method/Destructor.pm b/lib/Moose/Meta/Method/Destructor.pm index df95187..9c2dde4 100644 --- a/lib/Moose/Meta/Method/Destructor.pm +++ b/lib/Moose/Meta/Method/Destructor.pm @@ -10,7 +10,8 @@ use Scalar::Util 'blessed', 'weaken'; our $VERSION = '0.01'; our $AUTHORITY = 'cpan:STEVAN'; -use base 'Moose::Meta::Method'; +use base 'Moose::Meta::Method', + 'Class::MOP::Method::Generated'; sub new { my $class = shift;