Convert Text, Url, JsonTable and AssetReportQuery to use headTags.
This commit is contained in:
parent
d2623c2159
commit
adb279771b
4 changed files with 58 additions and 12 deletions
|
|
@ -125,6 +125,22 @@ sub getValueAsHtml {
|
|||
}
|
||||
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 headTags ( )
|
||||
|
||||
Add JS.
|
||||
|
||||
=cut
|
||||
|
||||
sub headTags {
|
||||
my $self = shift;
|
||||
return if $self->headTagsSent;
|
||||
$self->session->style->setScript($self->session->url->extras('addHTTP.js'),{ type=>'text/javascript' });
|
||||
$self->SUPER::headTags();
|
||||
return;
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 isDynamicCompatible ( )
|
||||
|
|
@ -147,7 +163,6 @@ Renders a URL field.
|
|||
|
||||
sub toHtml {
|
||||
my $self = shift;
|
||||
$self->session->style->setScript($self->session->url->extras('addHTTP.js'));
|
||||
$self->set("extras", $self->get('extras') . ' onblur="addHTTP(this.form.'.$self->get("name").')"');
|
||||
return $self->SUPER::toHtml;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue