diff options
| author | Ingo Schwarze <schwarze@openbsd.org> | 2017-02-09 15:34:28 +0000 |
|---|---|---|
| committer | Ingo Schwarze <schwarze@openbsd.org> | 2017-02-09 15:34:28 +0000 |
| commit | ffb7fbf356b9c244ecda2af4945a30de66c87730 (patch) | |
| tree | 9977e6a98695c60b60f520701ab4447781ce7ff4 /regress/regress.pl | |
| parent | 514b3c918bb51c5db29c844eb8d17090bd16c4f0 (diff) | |
| download | mandoc-ffb7fbf356b9c244ecda2af4945a30de66c87730.tar.gz | |
Escape literal braces in a regular expression.
Deprecated perlre(1) syntax reported by Thomas Klausner and Sevan Janiyan.
Diffstat (limited to 'regress/regress.pl')
| -rwxr-xr-x | regress/regress.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/regress/regress.pl b/regress/regress.pl index 7684e092..c09f21b6 100755 --- a/regress/regress.pl +++ b/regress/regress.pl @@ -142,7 +142,7 @@ sub parse_makefile ($) { my $var = $1; my $opt = $2; my $val = $3; - $val =~ s/\${(\w+)}/$vars{$1}/; + $val =~ s/\$\{(\w+)\}/$vars{$1}/; $val = "$vars{$var} $val" if $opt eq '+'; $vars{$var} = $val unless $opt eq '?' && defined $vars{$var}; |