push notifications to IRC #exim-builds

[buildfarm-server.git] / cgi-bin / show_stage_log.pl

diff --git a/cgi-bin/show_stage_log.pl b/cgi-bin/show_stage_log.pl
index fc40fa6f5f6841b9664cb7a5e97b661ff21757ae..e560089beff5fac67e3ef8c7682f7be31effe623 100755 (executable)
--- a/cgi-bin/show_stage_log.pl
+++ b/cgi-bin/show_stage_log.pl
@@ -3,6 +3,7 @@
 =comment
 
 Copyright (c) 2003-2010, Andrew Dunstan
+Copyright (c) 2022, The Exim Maintainers
 
 See accompanying License file for license details
 
@@ -16,9 +17,8 @@ use File::Temp qw(tempfile);
 
 use vars qw($dbhost $dbname $dbuser $dbpass $dbport @log_file_names);
 
-
-require "$ENV{BFConfDir}/BuildFarmWeb.pl";
-#require "BuildFarmWeb.pl";
+use FindBin qw($RealBin);
+require "$RealBin/../BuildFarmWeb.pl";
 
 die "no dbname" unless $dbname;
 die "no dbuser" unless $dbuser;
@@ -80,7 +80,7 @@ if ($system && $logdate && $stage)
 
     "-------------------------------------------------\n\n",
     "Hosting for the Exim BuildFarm is generously ",
-    "provided by: Todd Lyons";
+    "provided by: Mythic Beasts Ltd";
 
 }
 
@@ -89,4 +89,3 @@ else
     print "Status: 460 bad parameters\n",
     "Content-Type: text/plain\n\n";
 }
-