diff options
author | lpsolit%gmail.com <> | 2006-06-20 16:55:39 +0200 |
---|---|---|
committer | lpsolit%gmail.com <> | 2006-06-20 16:55:39 +0200 |
commit | 7f446ae898dc9f9fe8d97fdd01f0e39ba7676867 (patch) | |
tree | f6c6d8a3daa4b8244498c9b924a70bdaa5e324fd /testserver.pl | |
parent | 5ffe3d31dde3c11525ff09ce17e4b0d730e5e2fd (diff) | |
download | bugzilla-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-x | testserver.pl | 16 |
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"; |