X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FClassAttribute%2FTrait%2FRole.pm;h=2cf919c6ae292b65de87ab19cfc6b71510111a2a;hb=0cee5df4e6c398079ade79a540e683f5ecaf47c6;hp=6f86e25e0c9def2da6e55606b8746f897822138e;hpb=63fcc5089af76b1738850b39823dab675626ebfa;p=gitmo%2FMooseX-ClassAttribute.git

diff --git a/lib/MooseX/ClassAttribute/Trait/Role.pm b/lib/MooseX/ClassAttribute/Trait/Role.pm
index 6f86e25..2cf919c 100644
--- a/lib/MooseX/ClassAttribute/Trait/Role.pm
+++ b/lib/MooseX/ClassAttribute/Trait/Role.pm
@@ -3,6 +3,8 @@ package MooseX::ClassAttribute::Trait::Role;
 use strict;
 use warnings;
 
+our $VERSION   = '0.11';
+
 use MooseX::ClassAttribute::Meta::Role::Attribute;
 use Scalar::Util qw( blessed );
 
@@ -39,7 +41,7 @@ __END__
 
 =head1 NAME
 
-MooseX::ClassAttribute::Trait::Class - A metaclass role for classes with class attributes
+MooseX::ClassAttribute::Trait::Role - A trait for roles with class attributes
 
 =head1 SYNOPSIS
 
@@ -50,9 +52,9 @@ MooseX::ClassAttribute::Trait::Class - A metaclass role for classes with class a
 
 =head1 DESCRIPTION
 
-This role adds awareness of class attributes to a metaclass object. It
-provides a set of introspection methods that largely parallel the
-existing attribute methods, except they operate on class attributes.
+This role adds awareness of class attributes to a role metaclass object. It
+provides a set of introspection methods that largely parallel the existing
+attribute methods, except they operate on class attributes.
 
 =head1 METHODS
 
@@ -65,9 +67,8 @@ C<Class::MOP::Class> or C<Moose::Meta::Class> for regular attributes.
 
 =head2 $meta->get_class_attribute_list()
 
-=head2 $meta->get_class_attribute_map()
-
-These methods operate on the current metaclass only.
+These methods are exactly like their counterparts in
+L<MooseX::ClassAttribute::Trait::Class>.
 
 =head2 $meta->add_class_attribute(...)
 
@@ -77,53 +78,7 @@ C<add_attribute()> method. However, if an attribute is specified as
 
 =head2 $meta->remove_class_attribute($name)
 
-If the named class attribute exists, it is removed from the class,
-along with its accessor methods.
-
-=head2 $meta->get_all_class_attributes()
-
-This method returns a list of attribute objects for the class and all
-its parent classes.
-
-=head2 $meta->find_class_attribute_by_name($name)
-
-This method looks at the class and all its parent classes for the
-named class attribute.
-
-=head2 $meta->get_class_attribute_value($name)
-
-=head2 $meta->set_class_attribute_value($name, $value)
-
-=head2 $meta->set_class_attribute_value($name)
-
-=head2 $meta->clear_class_attribute_value($name)
-
-These methods operate on the storage for class attribute values, which
-is attached to the metaclass object.
-
-There's really no good reason for you to call these methods unless
-you're doing some deep hacking. They are named as public methods
-solely because they are used by other meta roles and classes in this
-distribution.
-
-=head2 inline_class_slot_access($name)
-
-=head2 inline_get_class_slot_value($name)
-
-=head2 inline_set_class_slot_value($name, $val_name)
-
-=head2 inline_is_class_slot_initialized($name)
-
-=head2 inline_deinitialize_class_slot($name)
-
-=head2 inline_weaken_class_slot_value($name)
-
-These methods return code snippets for inlining.
-
-There's really no good reason for you to call these methods unless
-you're doing some deep hacking. They are named as public methods
-solely because they are used by other meta roles and classes in this
-distribution.
+If the named class attribute exists, it is removed from the role.
 
 =head1 AUTHOR
 
@@ -135,7 +90,7 @@ See L<MooseX::ClassAttribute> for details.
 
 =head1 COPYRIGHT & LICENSE
 
-Copyright 2007-2008 Dave Rolsky, All Rights Reserved.
+Copyright 2007-2010 Dave Rolsky, All Rights Reserved.
 
 This program is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.