X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FClassAttribute.pm;h=42eefa40cfc7dad654de5e2c412e5a2e99cc2e2c;hb=ac5d97b7c897ed33fc74a15d4cf4038aa0c40025;hp=b7c6398a7d27fb3c171d80d4d17f84bcaa70a52e;hpb=8d65540448deca131e4c77686c6a1135116e522e;p=gitmo%2FMooseX-ClassAttribute.git diff --git a/lib/MooseX/ClassAttribute.pm b/lib/MooseX/ClassAttribute.pm index b7c6398..42eefa4 100644 --- a/lib/MooseX/ClassAttribute.pm +++ b/lib/MooseX/ClassAttribute.pm @@ -3,7 +3,7 @@ package MooseX::ClassAttribute; use strict; use warnings; -our $VERSION = '0.03'; +our $VERSION = '0.04'; our $AUTHORITY = 'cpan:DROLSKY'; our @EXPORT = 'class_has'; ## no critic ProhibitAutomaticExportation @@ -32,10 +32,10 @@ sub process_class_attribute ## no critic RequireArgUnpacking my @parents = $caller_meta->superclasses(); my $container_pkg = _make_container_class( $caller, @parents ); + my $container_meta = $container_pkg->meta(); - $container_pkg->meta()->_process_attribute(@_); + $container_meta->add_attribute(@_); - my $container_meta = $container_pkg->meta(); for my $meth ( grep { $_ ne 'instance' } $container_meta->get_method_list() ) { next if $caller_meta->has_method($meth); @@ -141,7 +141,7 @@ MooseX::ClassAttribute - Declare class attributes Moose-style ); __PACKAGE__->meta()->make_immutable(); - MooseX::ClassAttribute::containing_class()->meta()->make_immutable(); + MooseX::ClassAttribute::container_class()->meta()->make_immutable(); no Moose; no MooseX::ClassAttribute; @@ -171,7 +171,7 @@ the constructor will not set it. This class exports one function when you use it, C. This works exactly like Moose's C, but it declares class attributes. -Own little nit is that if you include C in your class, you +One little nit is that if you include C in your class, you won't remove the C function. To do that you must include C as well. @@ -193,10 +193,10 @@ for which you're creating class attributes. You don't need to worry about this too much, except when it comes to making a class immutable. Since the class attributes are not really stored in your class, you -need to make the containing class immutable as well as your own ... +need to make the container class immutable as well as your own ... __PACKAGE__->meta()->make_immutable(); - MooseX::ClassAttribute::containing_class()->meta()->make_immutable(); + MooseX::ClassAttribute::container_class()->meta()->make_immutable(); I