X-Git-Url: https://git.exim.org/exim.git/blobdiff_plain/d5c0d8c9374623620844d539d4810da63e9abca1..fa7b17bdbc8c055c475a50791627cd75d257f4f3:/test/stderr/3000?ds=sidebyside diff --git a/test/stderr/3000 b/test/stderr/3000 index a1b9f08a5..9ba2a62a2 100644 --- a/test/stderr/3000 +++ b/test/stderr/3000 @@ -2,46 +2,47 @@ Exim version x.yz .... configuration file is TESTSUITE/test-config admin user - ┌considering: ${perl{foo}{arg1}} - ┌considering: foo}{arg1}} +dropping to exim gid; retaining priv uid + ╭considering: ${perl{foo}{arg1}} + ╭considering: foo}{arg1}} ├──expanding: foo - └─────result: foo - ┌considering: arg1}} + ╰─────result: foo + ╭considering: arg1}} ├──expanding: arg1 - └─────result: arg1 + ╰─────result: arg1 Starting Perl interpreter ├──expanding: ${perl{foo}{arg1}} - └─────result: Subroutine foo called with args: arg1 - ┌considering: ${perl{foo_undef}} - ┌considering: foo_undef}} + ╰─────result: Subroutine foo called with args: arg1 + ╭considering: ${perl{foo_undef}} + ╭considering: foo_undef}} ├──expanding: foo_undef - └─────result: 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}} + ╰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}} + ╰─────result: debug_write + ╭considering: debug from Perl\n}} ├──expanding: debug from Perl\n - └─────result: debug from Perl + ╰─────result: debug from Perl debug 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}} + ╰─────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}} + ╰─────result: log_write + ╭considering: log from Perl}} ├──expanding: log from Perl - └─────result: 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 >>>>>>>>>>>>>>>> + ╰─────result: Wrote log +>>>>>>>>>>>>>>>> Exim pid=pppp (main: expansion test) terminating with rc=0 >>>>>>>>>>>>>>>> LOG: smtp_connection MAIN SMTP connection from CALLER LOG: MAIN @@ -61,7 +62,7 @@ LOG: smtp_connection MAIN >>> 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