Testsuite: perl version oddity

[exim.git] / test / scripts / 4020-socks / 4020

diff --git a/test/scripts/4020-socks/4020 b/test/scripts/4020-socks/4020
index 49d97c05f7dad0fde26a0332222a57e72884eeaf..4a0ac0893c4c84a1f58a17a6d169952e80c7fb76 100644 (file)
--- a/test/scripts/4020-socks/4020
+++ b/test/scripts/4020-socks/4020
@@ -3,7 +3,7 @@
 munge loopback
 #
 # auth: null
-server PORT_S
+server PORT_D
 <<\x05\x01\x00
 >>\x05\x00
 <<\x05\x01\x00\x01\x7f\x00\x00\x01\x04\xc8
@@ -42,7 +42,7 @@ quit
 #
 #
 # auth: username/password
-server PORT_S
+server PORT_D
 <<\x05\x01\x02
 >>\x05\x02
 <<\x01\x04fred\x05fubar
@@ -81,5 +81,4 @@ quit
 ****
 #
 #
-#
-
+# Ends