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

removing a bunch of grap we no longer need

Browse source
This commit is contained in:
JT Smith 2004-12-30 03:17:12 +00:00
parent 4f8489300f
commit 9e31680f41
28 changed files with 52 additions and 8280 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lib/WebGUI/Macro/RootTitle.pm
View file

@ -11,14 +11,20 @@ package WebGUI::Macro::RootTitle;
#-------------------------------------------------------------------
use strict;
use Tie::CPHash;
use WebGUI::Page;
use WebGUI::Asset;
use WebGUI::Session;
#-------------------------------------------------------------------
sub process {
my $root = WebGUI::Page->getWebGUIRoot;
return $root->get("title");
if (exists $session{asset}) {
my $lineage = $session{asset}->get("lineage");
$lineage = substr($lineage,0,6);
my $root = WebGUI::Asset->newByLineage($lineage);
if (defined $root) {
return $root->get("title");
}
}
return "";
}