File Coverage

blib/lib/Form/Factory/Control/Role/AvailableChoices.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package Form::Factory::Control::Role::AvailableChoices;
2             $Form::Factory::Control::Role::AvailableChoices::VERSION = '0.022';
3 1     1   626 use Moose::Role;
  1         2  
  1         6  
4              
5 1     1   4091 use Form::Factory::Control::Choice;
  1         2  
  1         51  
6              
7             # ABSTRACT: Controls that list available choices
8              
9              
10             has available_choices => (
11             is => 'ro',
12             isa => 'ArrayRef[Form::Factory::Control::Choice]',
13             required => 1,
14             );
15              
16             1;
17              
18             __END__
19              
20             =pod
21              
22             =encoding UTF-8
23              
24             =head1 NAME
25              
26             Form::Factory::Control::Role::AvailableChoices - Controls that list available choices
27              
28             =head1 VERSION
29              
30             version 0.022
31              
32             =head1 DESCRIPTION
33              
34             Controls that have a list of possible options to select from may implement this role.
35              
36             =head1 ATTRIBUTES
37              
38             =head2 available_choices
39              
40             The list of L<Form::Factory::Control::Choice> objects.
41              
42             =head1 AUTHOR
43              
44             Andrew Sterling Hanenkamp <hanenkamp@cpan.org>
45              
46             =head1 COPYRIGHT AND LICENSE
47              
48             This software is copyright (c) 2015 by Qubling Software LLC.
49              
50             This is free software; you can redistribute it and/or modify it under
51             the same terms as the Perl 5 programming language system itself.
52              
53             =cut