Switch to traditional Makefile.PL
[gitmo/MooseX-ClassAttribute.git] / lib / MooseX / ClassAttribute / Trait / Application / ToInstance.pm
index ef83c22..0752d27 100644 (file)
@@ -3,16 +3,16 @@ package MooseX::ClassAttribute::Trait::Application::ToInstance;
 use strict;
 use warnings;
 
-use Class::MOP;
+our $VERSION   = '0.11';
 
 use namespace::autoclean;
 use Moose::Role;
 
 after apply => sub {
-    shift->apply_class_attributes(@_);
+    shift->_apply_class_attributes(@_);
 };
 
-sub apply_class_attributes {
+sub _apply_class_attributes {
     my $self   = shift;
     my $role   = shift;
     my $object = shift;
@@ -41,3 +41,33 @@ sub apply_class_attributes {
 }
 
 1;
+
+__END__
+
+=pod
+
+=head1 NAME
+
+MooseX::ClassAttribute::Trait::Application::ToClass - A trait that supports applying class attributes to instances
+
+=head1 DESCRIPTION
+
+This trait is used to allow the application of roles containing class
+attributes to object instances.
+
+=head1 AUTHOR
+
+Dave Rolsky, C<< <autarch@urth.org> >>
+
+=head1 BUGS
+
+See L<MooseX::ClassAttribute> for details.
+
+=head1 COPYRIGHT & LICENSE
+
+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.
+
+=cut