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

precache webgui config files

Browse source
This commit is contained in:
JT Smith 2004-07-07 05:40:39 +00:00
parent 6bc2c33954
commit c39e7dc7b0
7 changed files with 196 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

23
sbin/preload.perl
View file

@ -1,10 +1,16 @@
#!/usr/bin/perl
use strict;
use lib "/data/WebGUI/lib"; # Edit to match your WebGUI installation directory.
my $webguiRoot;
BEGIN {
$webguiRoot = "/data/WebGUI"; # Edit to match your WebGUI installation directory.
unshift (@INC, $webguiRoot."/lib");
}
print "Starting WebGUI ".$WebGUI::VERSION."\t\t";
$|=1;
print "\nStarting WebGUI ".$WebGUI::VERSION."\n";
$ENV{GATEWAY_INTERFACE} =~ /^CGI-Perl/ or die "GATEWAY_INTERFACE not Perl!";
#----------------------------------------
@ -14,6 +20,7 @@ $ENV{GATEWAY_INTERFACE} =~ /^CGI-Perl/ or die "GATEWAY_INTERFACE not Perl!";
use ModPerl::Registry (); # Uncomment this for use with mod_perl 2.0
#----------------------------------------
# System controlled Perl modules.
#----------------------------------------
@ -63,6 +70,7 @@ use WebGUI::Auth ();
use WebGUI::Cache ();
use WebGUI::Collateral ();
use WebGUI::CollateralFolder ();
use WebGUI::Config ();
use WebGUI::DatabaseLink ();
use WebGUI::DateTime ();
use WebGUI::ErrorHandler ();
@ -198,7 +206,16 @@ use WebGUI::Auth::WebGUI ();
use WebGUI::Macro::AdminBar ();
use WebGUI::Macro::Navigation ();
print "[ OK ]\n";
#----------------------------------------
# Preload all site configs.
#----------------------------------------
WebGUI::Config::laodAllConfigs($webguiRoot);
print "WebGUI Started!\n";
1;