The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package HTML::FormHandler::Field::BoolSelect;
# ABSTRACT: Boolean select field


use Moose;
extends 'HTML::FormHandler::Field::Select';

has '+empty_select' => ( default => 'Select One' );

sub build_options { [
    { value => 1, label => 'True'},
    { value => 0, label => 'False' }
]};


__PACKAGE__->meta->make_immutable;
use namespace::autoclean;
1;

__END__

=pod

=head1 NAME

HTML::FormHandler::Field::BoolSelect - Boolean select field

=head1 VERSION

version 0.40054

=head1 SYNOPSIS

A Boolean select field with three states: null, 1, 0.
Empty select is 'Select One'.

=head1 AUTHOR

FormHandler Contributors - see HTML::FormHandler

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Gerda Shank.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut