Testsuite: perl version oddity

[exim.git] / test / scripts / 0000-Basic / 0502

diff --git a/test/scripts/0000-Basic/0502 b/test/scripts/0000-Basic/0502
index d4b8f0fdb9f623b90c11322fc7775a48317cf75b..e51ac277d7945e54e95c1226bec14415f8d77643 100644 (file)
--- a/test/scripts/0000-Basic/0502
+++ b/test/scripts/0000-Basic/0502
@@ -1,5 +1,6 @@
 # ACL for QUIT
 exim -bs
+helo test
 mail from:<x@y>
 rcpt to:<a@y>
 rcpt to:<b@y>
@@ -20,6 +21,26 @@ exim -bs -DLAST='deny message = Your message here'
 quit
 ****
 exim -bs -DLAST=''
+helo test
 mail from:<a@b>
 quit
 ****
+#
+# Check the server closes conn after a quit-response
+exim -DSERVER=server -DLAST=accept -bd -oX PORT_D
+****
+client 127.0.0.1 PORT_D
+??? 220
+EHLO test.ex
+??? 250-
+??? 250-
+??? 250-
+??? 250-
+??? 250-
+??? 250 HELP
+QUIT
+??? 221
+???*eof
+****
+#
+killdaemon