From b32a96eda015e47eda24338937d271c47f5ce38e Mon Sep 17 00:00:00 2001 From: Yang Tse Date: Tue, 12 Jan 2010 22:11:13 +0000 Subject: Fix tftp and sftp supported protocols in servername_str() --- tests/serverhelp.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/serverhelp.pm b/tests/serverhelp.pm index 35dda01c5..53aeb79cb 100644 --- a/tests/serverhelp.pm +++ b/tests/serverhelp.pm @@ -70,7 +70,7 @@ sub servername_str { $proto = uc($proto) if($proto); die "unsupported protocol: $proto" unless($proto && - ($proto =~ /^(((FTP|HTTP|IMAP|POP3|SMTP|TFTP)S?)|(SOCKS|SSH))$/)); + ($proto =~ /^(((FTP|HTTP|IMAP|POP3|SMTP)S?)|(TFTP|SFTP|SOCKS|SSH))$/)); $ipver = (not $ipver) ? 'ipv4' : lc($ipver); die "unsupported IP version: $ipver" unless($ipver && -- cgit v1.2.3