lib/MooseX/AttributeHelpers/Collection/List.pm

   1
   2 package MooseX::AttributeHelpers::Collection::List;
   3 use Moose;
   4
   5 our $VERSION   = '0.01';
   6 our $AUTHORITY = 'cpan:STEVAN';
   7
   8 use MooseX::AttributeHelpers::MethodProvider::List;
   9
  10 extends 'MooseX::AttributeHelpers::Collection';
  11
  12 has '+method_provider' => (
  13     default => 'MooseX::AttributeHelpers::MethodProvider::List'
  14 );
  15
  16 sub helper_type { 'ArrayRef' }
  17
  18 no Moose;
  19
  20 # register the alias ...
  21 package Moose::Meta::Attribute::Custom::Collection::List;
  22 sub register_implementation { 'MooseX::AttributeHelpers::Collection::List' }
  23
  24
  25 1;
  26
  27 __END__
  28
  29 =pod
  30
  31 =head1 NAME
  32
  33 MooseX::AttributeHelpers::Collection::List
  34
  35 =head1 SYNOPSIS
  36
  37   package Stuff;
  38   use Moose;
  39   use MooseX::AttributeHelpers;
  40
  41   has 'options' => (
  42       metaclass => 'Collection::List',
  43       is        => 'ro',
  44       isa       => 'ArrayRef[Int]',
  45       default   => sub { [] },
  46       provides  => {
  47           map  => 'map_options',
  48           grep => 'fitler_options',
  49       }
  50   );
  51
  52 =head1 DESCRIPTION
  53
  54 This module provides an List attribute which provides a number of
  55 list operations. See L<MooseX::AttributeHelpers::MethodProvider::List>
  56 for more details.
  57
  58 =head1 METHODS
  59
  60 =over 4
  61
  62 =item B<meta>
  63
  64 =item B<method_provider>
  65
  66 =item B<has_method_provider>
  67
  68 =item B<helper_type>
  69
  70 =back
  71
  72 =head1 BUGS
  73
  74 All complex software has bugs lurking in it, and this module is no
  75 exception. If you find a bug please either email me, or add the bug
  76 to cpan-RT.
  77
  78 =head1 AUTHOR
  79
  80 Stevan Little E<lt>stevan@iinteractive.comE<gt>
  81
  82 =head1 COPYRIGHT AND LICENSE
  83
  84 Copyright 2007 by Infinity Interactive, Inc.
  85
  86 L<http://www.iinteractive.com>
  87
  88 This library is free software; you can redistribute it and/or modify
  89 it under the same terms as Perl itself.
  90
  91 =cut