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

Changed style system to a "body" configuration rather than header/footer.

Browse source
This commit is contained in:
JT Smith 2002-05-26 18:32:08 +00:00
parent 3f2abb21e5
commit 299995af14
4 changed files with 70 additions and 87 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/WebGUI/Session.pm
View file

@ -93,6 +93,27 @@ sub _getUserInfo {
return \%user;
}
#-------------------------------------------------------------------
sub _loadMacros {
my ($namespace, $cmd, @files, $file, $dir);
if ($^O =~ /Win/i) {
$dir = "\\lib\\WebGUI\\Macro";
} else {
$dir = "/lib/WebGUI/Macro";
}
opendir (DIR,$session{config}{webguiRoot}.$dir) or WebGUI::ErrorHandler::fatalError("Can't open macro directory!");
@files = readdir(DIR);
foreach $file (@files) {
if ($file =~ /(.*?)\.pm$/) {
$namespace = $1;
$cmd = "use WebGUI::Macro::".$1;
eval($cmd);
$session{macro}{$namespace} = $namespace;
}
}
closedir(DIR);
}
#-------------------------------------------------------------------
sub _loadWobjects {
my ($dir, @files, $file, $cmd, $namespace);
@ -199,6 +220,7 @@ sub open {
###----------------------------
### loading plugins
_loadWobjects();
_loadMacros();
}
#-------------------------------------------------------------------