X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=test%2Fstderr%2F3000;h=9ba2a62a2f1cd9178147b2853a09d0878eced0c2;hb=bcd69700de5abae9ece41aadd403b621c6869ed6;hp=47714a1259aeb1abd344cda9719913d314a6cc2b;hpb=6968512fc21cf0a41b2751bb9df39ed40941c1c3;p=user%2Fhenk%2Fcode%2Fexim.git

diff --git a/test/stderr/3000 b/test/stderr/3000
index 47714a125..9ba2a62a2 100644
--- a/test/stderr/3000
+++ b/test/stderr/3000
@@ -2,35 +2,47 @@
 Exim version x.yz ....
 configuration file is TESTSUITE/test-config
 admin user
-expanding: foo
-   result: foo
-expanding: arg1
-   result: arg1
+dropping to exim gid; retaining priv uid
+ ╭considering: ${perl{foo}{arg1}}
+  ╭considering: foo}{arg1}}
+  ├──expanding: foo
+  ╰─────result: foo
+  ╭considering: arg1}}
+  ├──expanding: arg1
+  ╰─────result: arg1
 Starting Perl interpreter
-expanding: ${perl{foo}{arg1}}
-   result: Subroutine foo called with args: arg1
-expanding: foo_undef
-   result: foo_undef
-failed to expand: ${perl{foo_undef}}
-   error message: Perl subroutine "foo_undef" returned undef to force failure
-failure was forced
-expanding: debug_write
-   result: debug_write
-expanding: debug from Perl\n
-   result: debug from Perl
-
+ ├──expanding: ${perl{foo}{arg1}}
+ ╰─────result: Subroutine foo called with args: arg1
+ ╭considering: ${perl{foo_undef}}
+  ╭considering: foo_undef}}
+  ├──expanding: foo_undef
+  ╰─────result: foo_undef
+ ├failed to expand: ${perl{foo_undef}}
+ ├───error message: Perl subroutine "foo_undef" returned undef to force failure
+ ╰failure was forced
+ ╭considering: ${perl{debug_write}{debug from Perl\n}}
+  ╭considering: debug_write}{debug from Perl\n}}
+  ├──expanding: debug_write
+  ╰─────result: debug_write
+  ╭considering: debug from Perl\n}}
+  ├──expanding: debug from Perl\n
+  ╰─────result: debug from Perl
+  
 debug from Perl
-expanding: ${perl{debug_write}{debug from Perl\n}}
-   result: Wrote debug
-expanding: log_write
-   result: log_write
-expanding: log from Perl
-   result: log from Perl
+ ├──expanding: ${perl{debug_write}{debug from Perl\n}}
+ ╰─────result: Wrote debug
+ ╭considering: ${perl{log_write}{log from Perl}}
+  ╭considering: log_write}{log from Perl}}
+  ├──expanding: log_write
+  ╰─────result: log_write
+  ╭considering: log from Perl}}
+  ├──expanding: log from Perl
+  ╰─────result: log from Perl
 LOG: MAIN
   log from Perl
-expanding: ${perl{log_write}{log from Perl}}
-   result: Wrote log
->>>>>>>>>>>>>>>> Exim pid=pppp terminating with rc=0 >>>>>>>>>>>>>>>>
+ ├──expanding: ${perl{log_write}{log from Perl}}
+ ╰─────result: Wrote log
+>>>>>>>>>>>>>>>> Exim pid=pppp (main: expansion test) terminating with rc=0 >>>>>>>>>>>>>>>>
 LOG: smtp_connection MAIN
   SMTP connection from CALLER
 LOG: MAIN
@@ -46,12 +58,15 @@ LOG: smtp_connection MAIN
 >>> host in helo_try_verify_hosts? no (option unset)
 >>> host in helo_accept_junk_hosts? no (option unset)
 >>> x.y.z 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 chunking_advertise_hosts? no (end of list)
 >>> using ACL "check_rcpt"
->>> processing "accept"
+>>> processing "accept" (TESTSUITE/test-config 20)
 LOG: this is a warning at TESTSUITE/aux-fixed/3000.pl line 25.
 >>> check condition = ${if !eq {${perl{foo_warn}}}{}}
 >>>                 = true
 >>> accept: condition test succeeded in ACL "check_rcpt"
+>>> end of ACL "check_rcpt": ACCEPT
 
 ******** SERVER ********