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)

1 files changed, 7 insertions, 3 deletions

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);