From: Stevan Little Date: Fri, 3 Feb 2006 21:32:35 +0000 (+0000) Subject: ready for the 0.04 release X-Git-Tag: 0_04~1 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d7c2cbe30716e833ca2943dc60e955919b547d30;p=gitmo%2FClass-MOP.git ready for the 0.04 release --- diff --git a/Changes b/Changes index 9e61249..fbcc008 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,6 @@ Revision history for Perl extension Class-MOP. -0.04 +0.04 Fri Feb. 3, 2006 * Class::MOP::Class - some documentation suggestions from #perl6 @@ -10,7 +10,7 @@ Revision history for Perl extension Class-MOP. * examples/ - added new examples: - AttributesWithHistory - - + - ClassEncapsultedAttributes 0.03 Fri Feb. 3, 2006 - converted to Module::Build instead of EU::MM diff --git a/README b/README index 36aca05..48be354 100644 --- a/README +++ b/README @@ -1,4 +1,4 @@ -Class::MOP version 0.03 +Class::MOP version 0.04 =========================== See the individual module documentation for more information diff --git a/examples/ClassEncapsulatedAttributes.pod b/examples/ClassEncapsulatedAttributes.pod index 030fdb4..7c19e7a 100644 --- a/examples/ClassEncapsulatedAttributes.pod +++ b/examples/ClassEncapsulatedAttributes.pod @@ -13,7 +13,6 @@ use base 'Class::MOP::Class'; sub construct_instance { my ($class, %params) = @_; - #use Data::Dumper; warn Dumper \%params; my $instance = {}; foreach my $current_class ($class->class_precedence_list()) { $instance->{$current_class} = {} @@ -36,7 +35,6 @@ sub construct_instance { $instance->{$current_class}->{$attr_name} = $val; } } - #use Data::Dumper; warn Dumper $instance; return $instance; } @@ -144,6 +142,15 @@ ClassEncapsulatedAttributes - A set of example metaclasses with class encapsulat =head1 DESCRIPTION +This is an example metaclass which encapsulates a class's +attributes on a per-class basis. This means that there is no +possibility of name clashes with inherited attributes. This +is similar to how C++ handles its data members. + +=head1 ACKNOWLEDGEMENTS + +Thanks to Yuval "nothingmuch" Kogman for the idea for this example. + =head1 AUTHOR Stevan Little Estevan@iinteractive.comE