[PATCH v2 1/7] Documentation: fix warning in cat-texi.perl
- From
brian m. carlson <sandals@crustytoothpaste.net>
- Date
- Jan 22, 2017, 02:41 UTC
- Message-ID
- <20170122024156.284180-2-sandals@crustytoothpaste.net>
- In-Reply-To
- <20170122024156.284180-1-sandals@crustytoothpaste.net>
Newer versions of Perl produce the warning "Unescaped left brace in regex is deprecated, passed through in regex" when an unescaped left brace occurs in a regex. Escape the brace to avoid this warning.
Signed-off-by: brian m. carlson <sandals@crustytoothpaste.net> --- Documentation/cat-texi.perl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/Documentation/cat-texi.perl b/Documentation/cat-texi.perl index 87437f8a9..b1fe52e8b 100755 --- a/Documentation/cat-texi.perl +++ b/Documentation/cat-texi.perl @@ -11,7 +11,7 @@ while (<STDIN>) { if (s/^\@top (.*)/\@node $1,,,Top/) { push @menu, $1; } - s/\(\@pxref{\[(URLS|REMOTES)\]}\)//; + s/\(\@pxref\{\[(URLS|REMOTES)\]}\)//; s/\@anchor\{[^{}]*\}//g; print TMP; }