From ab04c2a14f457cc61b71af2ab42505f4950136d6 Mon Sep 17 00:00:00 2001 From: Graham Knop Date: Thu, 11 Mar 2010 09:10:17 -0600 Subject: [PATCH] tweak preload.perl --- sbin/preload.perl | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/sbin/preload.perl b/sbin/preload.perl index 17209bffe..46b438b6a 100644 --- a/sbin/preload.perl +++ b/sbin/preload.perl @@ -3,17 +3,15 @@ use strict; use WebGUI::Paths -preload; use Log::Log4perl; -Log::Log4perl->init( WebGUI::Paths->logConfig ); - use DBI; -DBI->install_driver("mysql"); - use WebGUI; use WebGUI::Config; -use APR::Request::Apache2; use Apache2::Cookie; use Apache2::ServerUtil; +Log::Log4perl->init( WebGUI::Paths->logConfig ); +DBI->install_driver("mysql"); + if ( $ENV{MOD_PERL} ) { # Add WebGUI to Apache version tokens my $server = Apache2::ServerUtil->server;