Fix tftp and sftp supported protocols in servername_str()
authorYang Tse <yangsita@gmail.com>
Tue, 12 Jan 2010 22:11:13 +0000 (22:11 +0000)
committerYang Tse <yangsita@gmail.com>
Tue, 12 Jan 2010 22:11:13 +0000 (22:11 +0000)
tests/serverhelp.pm

index 35dda01..53aeb79 100644 (file)
@@ -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 &&