Testsuite: revert some of the modernish Perl constructs

[exim.git] / test / stderr / 0371

diff --git a/test/stderr/0371 b/test/stderr/0371
index 0824ae85b5631093f05d1e23663a09da01b62bc6..1cdf00177a9306c8fb7091bb3b5c9317b446b3a5 100644 (file)
--- a/test/stderr/0371
+++ b/test/stderr/0371
@@ -45,7 +45,7 @@ SMTP>> 250-mail.test.ex Hello something [V4NET.0.0.0]
 250 HELP
 SMTP<< mail from:<x@y>
 spool directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100 msg_size = 0
 250 HELP
 SMTP<< mail from:<x@y>
 spool directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100 msg_size = 0

-log directory space = -1K inodes = -1 check_space = 10240K inodes = 100
+log directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100

 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail
 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail


@@ -124,7 +124,7 @@ LOG: MAIN
 SMTP>> 550 <x@y> Unrouteable address
 SMTP<< mail from:<x@y>
 spool directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100 msg_size = 0
 SMTP>> 550 <x@y> Unrouteable address
 SMTP<< mail from:<x@y>
 spool directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100 msg_size = 0

-log directory space = -1K inodes = -1 check_space = 10240K inodes = 100
+log directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100

 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail
 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail