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

dum dum dum dum dum

Browse source
This commit is contained in:
Doug Bell 2008-12-03 04:16:51 +00:00
parent 0bbae2fe41
commit 438058dc7d
2 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Asset.pm
View file

@ -2135,7 +2135,8 @@ sub processTemplate {
=head2 processStyle ( html ) =head2 processStyle ( html )
Returns some HTML wrappered in a style. Should be overridden by subclasses, because Returns some HTML wrappered in a style. Should be overridden by subclasses, because
this one actually doesn't do anything other than return the html back to you this one actually doesn't do anything other than return the html back to you and
adds the Asset's extraHeadTags into the raw head tags.
=head3 html =head3 html
@ -2145,6 +2146,7 @@ The content to wrap up.
sub processStyle { sub processStyle {
my ($self, $output) = @_; my ($self, $output) = @_;
$self->session->style->setRawHeadTags($self->getExtraHeadTags);
return $output; return $output;
} }

4
lib/WebGUI/Asset/Wobject.pm
View file

@ -370,7 +370,8 @@ sub processPropertiesFromFormPost {
=head2 processStyle ( output ) =head2 processStyle ( output )
Returns output parsed under the current style. Returns output parsed under the current style. Sets the Asset's extra head tags
into the raw head tags, too.
=head3 output =head3 output
@ -381,6 +382,7 @@ An HTML blob to be parsed into the current style.
sub processStyle { sub processStyle {
my $self = shift; my $self = shift;
my $output = shift; my $output = shift;
$self->session->style->setRawHeadTags($self->getExtraHeadTags);
return $self->session->style->process($output,$self->get("styleTemplateId")); return $self->session->style->process($output,$self->get("styleTemplateId"));
} }