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

Convert Integer to headTags. Convert toHtml part of HTMLArea to headTags.

Browse source
This commit is contained in:
Colin Kuskie 2010-09-14 13:18:03 -07:00
parent 61e2f4eb2e
commit 2b3fc264ae
2 changed files with 26 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -146,6 +146,19 @@ sub getValueAsHtml {
}
#-------------------------------------------------------------------
=head2 headTags ( )
Set the head tags for this form plugin
=cut
sub headTags {
my $self = shift;
$self->session->style->setScript($self->session->url->extras('textFix.js'),{ type=>'text/javascript' });
}
#-------------------------------------------------------------------
=head2 isDynamicCompatible ( )
@ -171,7 +184,6 @@ sub toHtml {
my $i18n = WebGUI::International->new($self->session);
my $richEdit = eval { WebGUI::Asset::RichEdit->newById($self->session, $self->get("richEditId")); };
if (! Exception::Class->caught() ) {
$self->session->style->setScript($self->session->url->extras('textFix.js'));
$self->set("extras", $self->get('extras') . q{ onblur="fixChars(this.form['}.$self->get("name").q{'])" mce_editable="true" });
$self->set("resizable", 0);
return $self->SUPER::toHtml.$richEdit->getRichEditor($self->get('id'));

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

@ -126,6 +126,19 @@ sub getValue {
#-------------------------------------------------------------------
=head2 headTags ( )
Set head tags for this form plugin
=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.
@ -146,7 +159,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").'\'),\'0123456789-\')"');
return $self->SUPER::toHtml;
}