Make the server ignore the given PORT address, to make it possible to test

curl's -P option easier.

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 422c43097767a66ab6658d6c6dc4dcbbb2262913..dca91f50838bf7d76279d5e24897306b62f49007 100644 (file)
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -488,7 +488,8 @@ sub PORT_command {
         print "500 silly you, go away\r\n";
         return 0;
     }
-    my $iaddr = inet_aton("$1.$2.$3.$4");
+    #my $iaddr = inet_aton("$1.$2.$3.$4");
+    my $iaddr = inet_aton("127.0.0.1"); # always use localhost
 
     my $port = ($5<<8)+$6;