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

[ 1274414 ] extraHeadTags entirely unused

Browse source
This commit is contained in:
Matthew Wilson 2005-08-27 03:18:08 +00:00
parent d1f1538b67
commit 7255a9e6a3
5 changed files with 33 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/WebGUI/Asset/Shortcut.pm
View file

@ -189,6 +189,19 @@ sub getEditForm {
}
#-------------------------------------------------------------------
=head2 getExtraHeadTags ( )
Returns the extraHeadTags stored in the asset. Called in WebGUI::Style::generateAdditionalHeadTags if this asset is the $session{asset}. Also called in WebGUI::Layout::view for its child assets. Overriden here in Shortcut.pm.
=cut
sub getExtraHeadTags {
my $self = shift;
return $self->get("extraHeadTags")."\n".$self->getShortcut->get("extraHeadTags");
}
#-------------------------------------------------------------------
sub getShortcut {

1
lib/WebGUI/Asset/Wobject/Layout.pm
View file

@ -155,6 +155,7 @@ sub view {
foreach my $child (@{$children}) {
if ($asset eq $child->getId) {
unless (isIn($asset,@hidden) || !($child->canView)) {
WebGUI::Style::setRawHeadTags($child->getExtraHeadTags);
if ($i > $numPositions) {
push(@{$vars{"position1_loop"}},{
id=>$child->getId,