From 4b1350e467af1c5e4f18a6c3ce8b8f74a250114d Mon Sep 17 00:00:00 2001
From: Daniel Stenberg <daniel@haxx.se>
Date: Sun, 12 Dec 2004 23:31:45 +0000
Subject: when failing to verify a HTTP server, display what curl said on
 stderr to help debugging. (when using ipv6 I fell over this server that
 didn't have the ipv6 module loaded)

---
 tests/runtests.pl | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

(limited to 'tests')

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 2a03117e8..f66fdeef0 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -350,15 +350,19 @@ sub runhttpserver {
     $pid = checkserver($pidfile);
 
     # verify if our/any server is running on this port
-    my $cmd = "$CURL -o log/verifiedserver -g \"http://$ip:$port/verifiedserver\" 2>/dev/null";
+    my $cmd = "$CURL -o log/verifiedserver -g \"http://$ip:$port/verifiedserver\" 2>log/verifystderr";
     print "CMD; $cmd\n" if ($verbose);
     my $res = system($cmd);
 
     $res >>= 8; # rotate the result
     my $data;
 
-    print "RUN: curl command returned $res\n" if ($verbose);
-
+    if($res && $verbose) {
+        print "RUN: curl command returned $res\nRUN: ";
+        open(ERR, "<log/verifystderr");
+        print <ERR>;
+        close(ERR);
+    }
     open(FILE, "<log/verifiedserver");
     my @file=<FILE>;
     close(FILE);
-- 
cgit v1.2.3