The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

#
# This file is part of HTML-FormFu-ExtJS
#
# This software is Copyright (c) 2011 by Moritz Onken.
#
# This is free software, licensed under:
#
# The (three-clause) BSD License
#
BEGIN {
$HTML::FormFu::ExtJS::Element::Label::VERSION = '0.090';
}
use strict;
use utf8;
sub render {
my $class = shift;
my $self = shift;
my $parent = $self->can("_get_attributes") ? $self : $self->form;
my $value = $self->default;
map { $value = $_->process($value) } @{$self->get_deflators};
return {
xtype => "label",
(scalar $self->id) ? (id => scalar $self->id) : (),
$self->nested_name ? (name => $self->nested_name) : (),
cls => 'x-form-item', # adjust label height
text => $value,
$parent->_get_attributes($self)
};
}
1;
__END__
=pod
=head1 NAME
HTML::FormFu::ExtJS::Element::Label
=head1 VERSION
version 0.090
=head1 DESCRIPTION
Simple text element.
=head1 NAME
HTML::FormFu::ExtJS::Element::Text - Text element
=head1 SEE ALSO
L<HTML::FormFu::Element::Text>
=head1 COPYRIGHT & LICENSE
Copyright 2008 Moritz Onken, all rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
=cut
=head1 AUTHOR
Moritz Onken <onken@netcubed.de>
=head1 COPYRIGHT AND LICENSE
This software is Copyright (c) 2011 by Moritz Onken.
This is free software, licensed under:
The (three-clause) BSD License
=cut