X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FMethod.pm;h=04f1312ec2b7d1fb86da9f449bf01de7320ccb80;hb=b1897d4d804dc11f86868052ecb6997a04821df3;hp=dbb7773bdf2d714604c456bb4a67cc486527b432;hpb=ced555a9ceb78adcb278dbb1bedc8e36e17b03c0;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Method.pm b/lib/Class/MOP/Method.pm index dbb7773..04f1312 100644 --- a/lib/Class/MOP/Method.pm +++ b/lib/Class/MOP/Method.pm @@ -8,9 +8,11 @@ use Carp 'confess'; use Scalar::Util 'reftype', 'blessed'; use B 'svref_2object'; -our $VERSION = '0.03'; +our $VERSION = '0.04'; our $AUTHORITY = 'cpan:STEVAN'; +use base 'Class::MOP::Object'; + # NOTE: # if poked in the right way, # they should act like CODE refs. @@ -39,6 +41,8 @@ sub wrap { sub body { (shift)->{body} } +# TODO - add associated_class + # informational # NOTE: