X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FTypeCoercion.pm;h=e6c71b01e273d5284b7041693c6b107504de2848;hb=462bdc732ebe32abf5b9f3cd40033540a5f1388f;hp=ee685128053033ba983baf242b2fa122b1e305dc;hpb=60f0816092ffe11986388dd2bba56a356b697843;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/TypeCoercion.pm b/lib/Moose/Meta/TypeCoercion.pm index ee68512..e6c71b0 100644 --- a/lib/Moose/Meta/TypeCoercion.pm +++ b/lib/Moose/Meta/TypeCoercion.pm @@ -8,10 +8,6 @@ use metaclass; use Moose::Meta::Attribute; use Moose::Util::TypeConstraints (); -our $VERSION = '1.09'; -$VERSION = eval $VERSION; -our $AUTHORITY = 'cpan:STEVAN'; - __PACKAGE__->meta->add_attribute('type_coercion_map' => ( reader => 'type_coercion_map', default => sub { [] } @@ -99,14 +95,12 @@ sub coerce { $_[0]->_compiled_type_coercion->($_[1]) } 1; +# ABSTRACT: The Moose Type Coercion metaclass + __END__ =pod -=head1 NAME - -Moose::Meta::TypeCoercion - The Moose Type Coercion metaclass - =head1 DESCRIPTION A type coercion object is basically a mapping of one or more type @@ -176,17 +170,4 @@ This will return a L instance for this class. See L for details on reporting bugs. -=head1 AUTHOR - -Stevan Little Estevan@iinteractive.comE - -=head1 COPYRIGHT AND LICENSE - -Copyright 2006-2010 by Infinity Interactive, Inc. - -L - -This library is free software; you can redistribute it and/or modify -it under the same terms as Perl itself. - =cut