tests: avoid test warning with perl >= 5.22

* doc/local.mk (sc-lower-case-var): Escape a literal
left curly bracket, needed with perl >= 5.22
Fixes http://bugs.gnu.org/21060

diff --git a/doc/local.mk b/doc/local.mk
index a7d2411e7d4dc7a91f0ba5229ffd407178d781ef..37c5621e3e04ad069bdd8244c42ee4e10c496266 100644 (file)
--- a/doc/local.mk
+++ b/doc/local.mk
@@ -113,8 +113,8 @@ sc-avoid-zeroes:
 # The leading backslash exemption is to permit in-macro uses like
 # @var{\varName\} where the upper case letter is part of a parameter name.
 find_upper_case_var =          \
-  '/\@var{/ or next;           \
-   while (/\@var{(.+?)}/g)     \
+  '/\@var\{/ or next;          \
+   while (/\@var\{(.+?)}/g)    \
      {                         \
        $$v = $$1;              \
        $$v =~ /[A-Z]/ && $$v !~ /^\\/ and (print "$$ARGV:$$.:$$_"), $$m = 1 \