| Form-Factory documentation | Contained in the Form-Factory distribution. |
Form::Factory::Interface::HTML::Widget::Label - HTML interface widget helper
version 0.020
Move along. Nothing to see here.
Andrew Sterling Hanenkamp <hanenkamp@cpan.org>
Copyright 2009 Qubling Software LLC.
This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself.
| Form-Factory documentation | Contained in the Form-Factory distribution. |
package Form::Factory::Interface::HTML::Widget::Label; BEGIN { $Form::Factory::Interface::HTML::Widget::Label::VERSION = '0.020'; } use Moose; extends qw( Form::Factory::Interface::HTML::Widget::Element );
has '+tag_name' => ( default => 'label', ); has for => ( is => 'ro', isa => 'Str', required => 1, ); has '+content' => ( required => 1, ); override more_attributes => sub { my $self = shift; return { for => $self->for, }; };
1;