[exim-cvs] Testsuite: perl syntax (l-brace in RE)

Top Page
Delete this message
Reply to this message
Author: Exim Git Commits Mailing List
Date:  
To: exim-cvs
Subject: [exim-cvs] Testsuite: perl syntax (l-brace in RE)
Gitweb: https://git.exim.org/exim.git/commitdiff/00ac951dc593268b8f27a9c24c31e737644edd5a
Commit:     00ac951dc593268b8f27a9c24c31e737644edd5a
Parent:     4ed67f68df666fe38076e3bfd2183db71e742c7a
Author:     Jeremy Harris <jgh146exb@???>
AuthorDate: Mon Oct 21 17:39:37 2019 +0100
Committer:  Jeremy Harris <jgh146exb@???>
CommitDate: Mon Oct 21 17:39:37 2019 +0100


    Testsuite: perl syntax (l-brace in RE)
---
 test/runtest | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)


diff --git a/test/runtest b/test/runtest
index fea4084..3ecccb0 100755
--- a/test/runtest
+++ b/test/runtest
@@ -1103,7 +1103,7 @@ RESET_AFTER_EXTRA_LINE_READ:
       }


     # Non-TLS bulds have a different Recieved: header expansion
-    s/^((.*)\t}}}}by \$primary_hostname \${if def:received_protocol {with \$received_protocol }})\(Exim \$version_number\)$/$1\${if def:tls_in_cipher_std { tls \$tls_in_cipher_std\n$2\t}}(Exim \$version_number)/;
+    s/^((.*)\t}}}}by \$primary_hostname \$\{if def:received_protocol \{with \$received_protocol }})\(Exim \$version_number\)$/$1\${if def:tls_in_cipher_std { tls \$tls_in_cipher_std\n$2\t}}(Exim \$version_number)/;
     s/^((\s*).*considering: with \$received_protocol }})\(Exim \$version_number\)$/$1\${if def:tls_in_cipher_std { tls \$tls_in_cipher_std\n$2\t}}(Exim \$version_number)/;
     if (/condition: def:tls_in_cipher_std$/)
       {