From cbd72dff8696ab1ec64a6b0c31e982d2b3a8df3e Mon Sep 17 00:00:00 2001
From: "justdave%bugzilla.org" <>
Date: Sun, 11 Feb 2007 08:12:24 +0000
Subject: Bug 369956: Have testserver.pl report whether or not the server is
 using mod_perl r=mkanat, a=justdave

---
 testserver.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'testserver.pl')

diff --git a/testserver.pl b/testserver.pl
index af4ba67e7..108a19ac2 100755
--- a/testserver.pl
+++ b/testserver.pl
@@ -107,8 +107,8 @@ Check your webserver configuration and try again.\n";
 
 # Try to execute a cgi script
 my $response = fetch($ARGV[0] . "/testagent.cgi");
-if ($response =~ /^OK/) {
-    print "TEST-OK Webserver is executing CGIs.\n";
+if ($response =~ /^OK (.*)$/) {
+    print "TEST-OK Webserver is executing CGIs via $1.\n";
 } elsif ($response =~ /^#!/) {
     print 
 "TEST-FAILED Webserver is fetching rather than executing CGI files.
-- 
cgit v1.2.3-24-g4f1b