Testsuite: avoid recent-perl feature use
authorJeremy Harris <jgh146exb@wizmail.org>
Thu, 25 Apr 2019 17:41:52 +0000 (18:41 +0100)
committerJeremy Harris <jgh146exb@wizmail.org>
Thu, 25 Apr 2019 20:16:17 +0000 (21:16 +0100)
(cherry picked from commit 6010e708237477b8fab5fbed0a972a937d89fc56)

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;