Testsuite: revert some of the modernish Perl constructs

[exim.git] / test / stderr / 0525

diff --git a/test/stderr/0525 b/test/stderr/0525
index 553f8c1ce3adff70a58feab901b71b0269406b56..a15308559d41b0fc46928bb1eb3a836d7a9b7263 100644 (file)
--- a/test/stderr/0525
+++ b/test/stderr/0525
@@ -14,6 +14,7 @@ Connecting to 127.0.0.1 [127.0.0.1]:1224 ... connected
   SMTP>> DATA
   SMTP<< 354 SEND
   SMTP>> writing message and terminating "."
   SMTP>> DATA
   SMTP<< 354 SEND
   SMTP>> writing message and terminating "."

+  SMTP(close)>>

 LOG: MAIN
   H=127.0.0.1 [127.0.0.1]: SMTP timeout after sending data block (ddd bytes written): Connection timed out
 LOG: MAIN
 LOG: MAIN
   H=127.0.0.1 [127.0.0.1]: SMTP timeout after sending data block (ddd bytes written): Connection timed out
 LOG: MAIN