From 05144fcef30e94a727e26e011f60df8bb851f07b Mon Sep 17 00:00:00 2001
From: Andrew Aitchison <exim@aitchison.me.uk>
Date: Sun, 9 Jul 2023 22:27:32 +0100
Subject: Testsuite: fix perl syntax.  Bug 3009

Broken-by: 46a36afae41f
---
 test/runtest | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/test/runtest b/test/runtest
index 80b7721fb..e918b0cdf 100755
--- a/test/runtest
+++ b/test/runtest
@@ -1071,8 +1071,7 @@ RESET_AFTER_EXTRA_LINE_READ:
     s/250-AUTH ANONYMOUS PLAIN SCRAM-SHA-1\K SCRAM-SHA-256//;
 
     # mailq times change with when the run is done, vs. static-source spoolfiles
-    #s/\s*\d*[hd](?=   317 [0-9A-Za-z\-]{23} <nobody@test.ex>)/DDd/;
-    s/^\s*\d*[hd](?=   317 [0-9A-Za-z\-]{23} <nobody@test.)/DDd/;
+    s/\s*\d*[hd](?=   317 [0-9A-Za-z\-]{23} <nobody\@test.ex>)/DDd/;
     }
 
   # ======== stderr ========
-- 
cgit v1.2.3