summaryrefslogtreecommitdiffstats
path: root/testserver.pl
diff options
context:
space:
mode:
authorlpsolit%gmail.com <>2006-06-20 16:55:39 +0200
committerlpsolit%gmail.com <>2006-06-20 16:55:39 +0200
commit7f446ae898dc9f9fe8d97fdd01f0e39ba7676867 (patch)
treef6c6d8a3daa4b8244498c9b924a70bdaa5e324fd /testserver.pl
parent5ffe3d31dde3c11525ff09ce17e4b0d730e5e2fd (diff)
downloadbugzilla-7f446ae898dc9f9fe8d97fdd01f0e39ba7676867.tar.gz
bugzilla-7f446ae898dc9f9fe8d97fdd01f0e39ba7676867.tar.xz
Bug 313531: Move 'use Bugzilla;' out of globals.pl - Patch by Frédéric Buclin <LpSolit@gmail.com> r=mkanat a=myk
Diffstat (limited to 'testserver.pl')
-rwxr-xr-xtestserver.pl16
1 files changed, 11 insertions, 5 deletions
diff --git a/testserver.pl b/testserver.pl
index 0d1d08ba5..2211f8bfe 100755
--- a/testserver.pl
+++ b/testserver.pl
@@ -18,17 +18,23 @@
# as its only argument. It attempts to troubleshoot as many installation
# issues as possible.
+use strict;
+
+BEGIN {
+ my $envpath = $ENV{'PATH'};
+ require Bugzilla;
+ $ENV{'PATH'} = $envpath;
+}
+
+use lib ".";
+
use Socket;
use Bugzilla::Config qw($datadir);
-my $envpath = $ENV{'PATH'};
-use lib ".";
-use strict;
+
require "globals.pl";
eval "require LWP; require LWP::UserAgent;";
my $lwp = $@ ? 0 : 1;
-$ENV{'PATH'}= $envpath;
-
if ((@ARGV != 1) || ($ARGV[0] !~ /^https?:/))
{
print "Usage: $0 <URL to this Bugzilla installation>\n";