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

adding configure-by-env support

Browse source
This commit is contained in:
Martin Kamerbeek 2002-11-22 13:53:16 +00:00
parent 3764a80551
commit d70e3064b7
1 changed files with 24 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

28
lib/WebGUI/Session.pm
View file

@ -236,10 +236,30 @@ sub open {
### config variables
$session{config}{webguiRoot} = $_[0];
$session{config}{configFile} = $_[1] || "WebGUI.conf";
$config = new Data::Config $session{config}{webguiRoot}.'/etc/'.$session{config}{configFile};
foreach ($config->param) {
$session{config}{$_} = $config->param($_);
}
# Below is a patch which allow you to configure WebGUI with
# environmentvariables in stead of using WebGUI.conf. To enable this
# set a env var called wgConfigureByEnvironment to 'YES'. The var
# names are those of WebGUI.conf prepended with 'wg'.
#
# NOTE: This is an undocumented an experimental feature. It seems to
# work with apache/linux on multiple virtual hosts. For things like
# runHourly.pm you STILL need WebGUI.conf!
if ($ENV{wgConfigureByEnvironment} eq 'YES') {
foreach (keys(%ENV)) {
if ($_ =~ /^wg(.+)$/) {
$session{config}{$1} = $ENV{'wg'.$1};
}
}
} else {
$config = new Data::Config
$session{config}{webguiRoot}.'/etc/'.$session{config}{configFile};
foreach ($config->param) {
$session{config}{$_} = $config->param($_);
}
}
if( defined( $session{config}{scripturl} ) ) {
# get rid of leading "/" if present.
$session{config}{scripturl} =~ s/^\///;