Beginning of dzilization

[gitmo/Moose.git] / lib / Moose / Meta / Attribute / Native / Trait / Array.pm

diff --git a/lib/Moose/Meta/Attribute/Native/Trait/Array.pm b/lib/Moose/Meta/Attribute/Native/Trait/Array.pm
index 1de1760..a516448 100644 (file)
--- a/lib/Moose/Meta/Attribute/Native/Trait/Array.pm
+++ b/lib/Moose/Meta/Attribute/Native/Trait/Array.pm
@@ -2,8 +2,6 @@
 package Moose::Meta::Attribute::Native::Trait::Array;
 use Moose::Role;
 
-our $VERSION   = '1.9900';
-$VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
 with 'Moose::Meta::Attribute::Native::Trait';
@@ -14,14 +12,12 @@ no Moose::Role;
 
 1;
 
+# ABSTRACT: Helper trait for array delegation
+
 __END__
 
 =pod
 
-=head1 NAME
-
-Moose::Meta::Attribute::Native::Trait::Array - Helper trait for array delegation
-
 =head1 SYNOPSIS
 
     package Stuff;
@@ -166,10 +162,6 @@ This method transforms every element in the array and returns a new array,
 just like Perl's core C<map> function. This method requires a subroutine which
 implements the transformation.
 
-Note that if you add or subtract values within the supplied coderef, the
-values are I<not> saved back to the attribute. You need to use the attribute
-writer wrapped around the map call for that.
-
   my @mod_options = $stuff->map_options( sub { $_ . "-tag" } );
   print "@mod_options\n";    # prints "foo-tag bar-tag baz-tag boo-tag"
 
@@ -306,17 +298,4 @@ This method accepts one or two arguments.
 
 See L<Moose/BUGS> for details on reporting bugs.
 
-=head1 AUTHOR
-
-Stevan Little E<lt>stevan@iinteractive.comE<gt>
-
-=head1 COPYRIGHT AND LICENSE
-
-Copyright 2007-2010 by Infinity Interactive, Inc.
-
-L<http://www.iinteractive.com>
-
-This library is free software; you can redistribute it and/or modify
-it under the same terms as Perl itself.
-
 =cut