oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added 'textExtras' property for passing 'extras' to the text box portion of the combo

Browse source
This commit is contained in:
David Delikat 2011-08-13 17:40:39 -05:00
parent 428ea58327
commit ce73956d60
1 changed files with 20 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

21
lib/WebGUI/Form/Combo.pm
View file

@ -40,7 +40,25 @@ The following methods are specifically available from this class. Check the supe
=cut
#-------------------------------------------------------------------
=head2 definition ( session, [ additionalTerms ] )
Add another field so we can provide extras to the text area vs the selectBox
=cut
sub definition {
my $class = shift;
my $session = shift;
my $definition = shift || [];
push(@{$definition}, {
textExtras=>{
defaultValue=>undef
},
});
return $definition;
}
#-------------------------------------------------------------------
@ -127,7 +145,8 @@ sub toHtml {
.WebGUI::Form::Text->new($self->session,
size=>$self->session->setting->get("textBoxSize")-5,
name=>$self->get("name")."_new",
id=>$self->get('id')."_new"
id=>$self->get('id')."_new",
extras=>$self->get('textExtras')||$self->get('extras'),
)->toHtml;
}