From 3f55ed0ef7e4b277184293e5365719b7ae00c1b2 Mon Sep 17 00:00:00 2001
From: Dan Fandrich <dan@coneharvesters.com>
Date: Fri, 26 Oct 2007 19:26:04 +0000
Subject: Check that all servers in the <server> section are supported, not
 just the first.

---
 tests/runtests.pl | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

(limited to 'tests')

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 4e6e88387..1182c09d4 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -2376,12 +2376,14 @@ sub serverfortest {
         return "no server specified";
     }
 
-    my $proto = lc($what[0]);
-    chomp $proto;
-    if (! grep /^$proto$/, @protocols) {
-        if (substr($proto,0,5) ne "socks") {
-		return "curl lacks any $proto support";
-        }
+    for (@what) {
+	my $proto = lc($_);
+	chomp $proto;
+	if (! grep /^$proto$/, @protocols) {
+	    if (substr($proto,0,5) ne "socks") {
+		    return "curl lacks any $proto support";
+	    }
+	}
     }
 
     return &startservers(@what);
-- 
cgit v1.2.3