New server, FileBin instead of $ENV{BFConfDir}, and custom Captcha

[buildfarm-server.git] / scripts / delete_host.pl

diff --git a/scripts/delete_host.pl b/scripts/delete_host.pl
index 1c1baad33cd9a4c7f13bd60a596ba201e2a413ae..0a77e0f9ca08ab3bed92be5305b5da3ce804f7bc 100755 (executable)
--- a/scripts/delete_host.pl
+++ b/scripts/delete_host.pl
@@ -10,7 +10,9 @@ die "Must pass one and only one sysname to delete\n"
 
 use vars qw($dbhost $dbname $dbuser $dbpass $dbport
 );
-require "$ENV{BFConfDir}/BuildFarmWeb.pl";
+
+use FindBin qw($RealBin);
+require "$RealBin/../BuildFarmWeb.pl";
 
 die "no dbname" unless $dbname;
 die "no dbuser" unless $dbuser;