Testsuite: revert some of the modernish Perl constructs

[exim.git] / test / stderr / 0513

diff --git a/test/stderr/0513 b/test/stderr/0513
index b22bd2b1afd7f36f93f40a4884432b767e4888c9..864b2eaa102ffdf6e0fc20a7c1289ef4cd2bee27 100644 (file)
--- a/test/stderr/0513
+++ b/test/stderr/0513
@@ -7,7 +7,9 @@
 >>> host in helo_try_verify_hosts? no (option unset)
 >>> host in helo_accept_junk_hosts? no (option unset)
 >>> a.b.c.d in helo_lookup_domains? no (end of list)
 >>> host in helo_try_verify_hosts? no (option unset)
 >>> host in helo_accept_junk_hosts? no (option unset)
 >>> a.b.c.d in helo_lookup_domains? no (end of list)

+>>> host in dsn_advertise_hosts? no (option unset)

 >>> host in pipelining_advertise_hosts? yes (matched "*")
 >>> host in pipelining_advertise_hosts? yes (matched "*")

+>>> host in chunking_advertise_hosts? no (end of list)

 >>> using ACL "check_rcpt"
 >>> processing "defer"
 >>> check !verify = recipient
 >>> using ACL "check_rcpt"
 >>> processing "defer"
 >>> check !verify = recipient


@@ -17,5 +19,7 @@
 >>> r1 router declined for x@mxt2.test.ex
 >>> no more routers
 >>> ----------- end verify ------------
 >>> r1 router declined for x@mxt2.test.ex
 >>> no more routers
 >>> ----------- end verify ------------

->>> defer: condition test succeeded
+>>>   message: >$acl_verify_message< ++++
+>>> defer: condition test succeeded in ACL "check_rcpt"
+>>> end of ACL "check_rcpt": DEFER

 LOG: H=(a.b.c.d) [1.2.3.4] F=<> temporarily rejected RCPT <x@mxt2.test.ex>: all relevant MX records point to non-existent hosts
 LOG: H=(a.b.c.d) [1.2.3.4] F=<> temporarily rejected RCPT <x@mxt2.test.ex>: all relevant MX records point to non-existent hosts