Testsuite: avoid recent-perl feature use
authorJeremy Harris <jgh146exb@wizmail.org>
Thu, 25 Apr 2019 17:41:52 +0000 (18:41 +0100)
committerHeiko Schlittermann (HS12-RIPE) <hs@schlittermann.de>
Fri, 19 Jul 2019 06:55:06 +0000 (08:55 +0200)
(cherry picked from commit 6010e708237477b8fab5fbed0a972a937d89fc56)
(cherry picked from commit d4e985be7a3789aa84fb51a0523fc13c7cdff889)

test/runtest

index b6c73bbe07c8b7786abf675bf95fd5c31d3b2dca..ed930e4e3d6192bb060f07fe70f1c0ca815b5aa8 100755 (executable)
@@ -627,7 +627,7 @@ RESET_AFTER_EXTRA_LINE_READ:
     /"TLS1.x:ke-"
        . (defined($+{psk}) ? $+{psk} : "")
        . (defined($+{auth}) ? $+{auth} : "")
-       . "-AES256-SHAnnn:xxx"/genx;
+       . "-AES256-SHAnnn:xxx"/gex;
   s/TLS1.2:RSA__CAMELLIA_256_GCM(_SHA384)?:256/TLS1.2:RSA_CAMELLIA_256_GCM-SHAnnn:256/g;
   s/\b(ECDHE-(RSA|ECDSA)-AES256-SHA|DHE-RSA-AES256-SHA256)\b/ke-$2-AES256-SHAnnn/g;