X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=test%2Fstderr%2F3000;h=3f8338b67def685b237607bad24ff219b9a6e054;hb=7f69e814219268610c9d5c9b724f64a17a78b2cb;hp=6aea66ac5bd66c8eb55a8e02407f739296f7abbf;hpb=44bc8f0c2f3576b46bd6df1b818cb29eaf84df5b;p=exim.git

diff --git a/test/stderr/3000 b/test/stderr/3000
index 6aea66ac5..3f8338b67 100644
--- a/test/stderr/3000
+++ b/test/stderr/3000
@@ -2,46 +2,46 @@
 Exim version x.yz ....
 configuration file is TESTSUITE/test-config
 admin user
-considering: ${perl{foo}{arg1}}
-considering: foo}{arg1}}
-  expanding: foo
-     result: foo
-considering: arg1}}
-  expanding: arg1
-     result: arg1
+ ┌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
-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
-
+ ├──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
-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
+ ├──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