1 package MooseX::ClassAttribute;
7 our $AUTHORITY = 'cpan:DROLSKY';
10 use MooseX::ClassAttribute::Meta::Method::Accessor;
12 extends 'Moose::Meta::Attribute';
14 sub accessor_metaclass { 'MooseX::ClassAttribute::Meta::Method::Accessor' }
16 # This is called when an object is constructed.
17 sub initialize_instance_slot
23 # This is the bit of magic that lets you specify the metaclass as
24 # 'ClassAttribute', rather than the full name, when creating an
26 package Moose::Meta::Attribute::Custom::ClassAttribute;
28 sub register_implementation { 'MooseX::ClassAttribute' }
39 MooseX::ClassAttribute - The fantastic new MooseX::ClassAttribute!
43 Quick summary of what the module does.
45 Perhaps a little code snippet.
47 use MooseX::ClassAttribute;
49 my $foo = MooseX::ClassAttribute->new();
55 This class provides the following methods
59 Dave Rolsky, C<< <autarch@urth.org> >>
63 Please report any bugs or feature requests to C<bug-moosex-classattribute@rt.cpan.org>,
64 or through the web interface at L<http://rt.cpan.org>. I will be
65 notified, and then you'll automatically be notified of progress on
66 your bug as I make changes.
68 =head1 COPYRIGHT & LICENSE
70 Copyright 2007 Dave Rolsky, All Rights Reserved.
72 This program is free software; you can redistribute it and/or modify
73 it under the same terms as Perl itself.