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

Convert Hexadecimal to headTags

Browse source
This commit is contained in:
Colin Kuskie 2010-09-14 13:15:28 -07:00
parent 3368e72246
commit 61e2f4eb2e
1 changed files with 13 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lib/WebGUI/Form/Hexadecimal.pm
View file

@ -110,6 +110,19 @@ sub getValue {
#-------------------------------------------------------------------
=head2 headTags ( )
A class method that returns a boolean indicating whether this control is compatible with the DynamicField control.
=cut
sub headTags {
my $self = shift;
$self->session->style->setScript($self->session->url->extras('inputCheck.js'),{ type=>'text/javascript' });
}
#-------------------------------------------------------------------
=head2 isDynamicCompatible ( )
A class method that returns a boolean indicating whether this control is compatible with the DynamicField control.
@ -130,7 +143,6 @@ Renders an integer field.
sub toHtml {
my $self = shift;
$self->session->style->setScript($self->session->url->extras('inputCheck.js'));
$self->set("extras", $self->get('extras') . ' onkeyup="doInputCheck(document.getElementById(\''.$self->get("id").'\'),\'0123456789abcdef\')"');
return $self->SUPER::toHtml;
}