From 4adf7d62d4103623b546041023a476cdfb106b52 Mon Sep 17 00:00:00 2001
From: Daniel Stenberg <daniel@haxx.se>
Date: Sun, 20 Dec 2009 22:00:23 +0000
Subject: [PATCH] rename the verifyftp function to verifyserver since it is
 used to verify a wide variety of protocol servers

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

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 770ffadcf..1abe2e6a8 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -617,7 +617,7 @@ sub verifyhttp {
 # server runs fine but we cannot talk to it ("Failed to connect to ::1: Can't
 # assign requested address" #
 
-sub verifyftp {
+sub verifyserver {
     my ($proto, $ip, $port) = @_;
     my $pid;
     my $time=time();
@@ -625,7 +625,7 @@ sub verifyftp {
     if($proto eq "ftps") {
     	$extra = "--insecure --ftp-ssl-control ";
     }
-    my $cmd="$VCURL --max-time $server_response_maxtime --silent --verbose --globoff $extra\"$proto://$ip:$port/verifiedserver\" 2>$LOGDIR/verifyftp";
+    my $cmd="$VCURL --max-time $server_response_maxtime --silent --verbose --globoff $extra\"$proto://$ip:$port/verifiedserver\" 2>$LOGDIR/verifyserver";
     # check if this is our server running on this port:
     my @data=runclientoutput($cmd);
     logmsg "RUN: $cmd\n" if($verbose);
@@ -750,12 +750,12 @@ sub verifysocks {
 
 my %protofunc = ('http' => \&verifyhttp,
                  'https' => \&verifyhttp,
-                 'ftp' => \&verifyftp,
-                 'pop3' => \&verifyftp,
-                 'imap' => \&verifyftp,
-                 'smtp' => \&verifyftp,
-                 'ftps' => \&verifyftp,
-                 'tftp' => \&verifyftp,
+                 'ftp' => \&verifyserver,
+                 'pop3' => \&verifyserver,
+                 'imap' => \&verifyserver,
+                 'smtp' => \&verifyserver,
+                 'ftps' => \&verifyserver,
+                 'tftp' => \&verifyserver,
                  'ssh' => \&verifyssh,
                  'socks' => \&verifysocks);