diff options
author | Troy Dawson <tdawson@redhat.com> | 2017-07-24 14:42:06 +0200 |
---|---|---|
committer | Mike Frysinger <vapier@gentoo.org> | 2018-01-21 00:03:26 -0500 |
commit | 406eab7aa09da9df787a964d3c152c0bda6e23c4 (patch) | |
tree | fe743f07b1f1abc4cbcd10c73778ab14fab7beda | |
parent | cfd8e6ef491a7a5ff900ba2ba3deff7d0bebb0a6 (diff) | |
download | attr-406eab7aa09da9df787a964d3c152c0bda6e23c4.tar.gz |
test: escape left brace in a regex in test/run
... to fix test-suite failure with perl-5.26.0
Bug: https://bugzilla.redhat.com/1473853
-rwxr-xr-x | test/run | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -106,7 +106,7 @@ for (;;) { if (defined $line) { # Substitute %VAR and %{VAR} with environment variables. $line =~ s[%(\w+)][$ENV{$1}]eg; - $line =~ s[%{(\w+)}][$ENV{$1}]eg; + $line =~ s[%\{(\w+)}][$ENV{$1}]eg; } if (defined $line) { if ($line =~ s/^\s*< ?//) { |