File Coverage

blib/lib/HTML/FormHandler/Field/BoolSelect.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 10 11 90.9


line stmt bran cond sub pod time code
1             package HTML::FormHandler::Field::BoolSelect;
2             # ABSTRACT: Boolean select field
3             $HTML::FormHandler::Field::BoolSelect::VERSION = '0.40068';
4              
5 3     3   2490 use Moose;
  3         8  
  3         25  
6             extends 'HTML::FormHandler::Field::Select';
7              
8             has '+empty_select' => ( default => 'Select One' );
9              
10             sub build_options { [
11 3     3 0 92 { value => 1, label => 'True'},
12             { value => 0, label => 'False' }
13             ]};
14              
15              
16             __PACKAGE__->meta->make_immutable;
17 3     3   19812 use namespace::autoclean;
  3         8  
  3         31  
18             1;
19              
20             __END__
21              
22             =pod
23              
24             =encoding UTF-8
25              
26             =head1 NAME
27              
28             HTML::FormHandler::Field::BoolSelect - Boolean select field
29              
30             =head1 VERSION
31              
32             version 0.40068
33              
34             =head1 SYNOPSIS
35              
36             A Boolean select field with three states: null, 1, 0.
37             Empty select is 'Select One'.
38              
39             =head1 AUTHOR
40              
41             FormHandler Contributors - see HTML::FormHandler
42              
43             =head1 COPYRIGHT AND LICENSE
44              
45             This software is copyright (c) 2017 by Gerda Shank.
46              
47             This is free software; you can redistribute it and/or modify it under
48             the same terms as the Perl 5 programming language system itself.
49              
50             =cut