From: Mauro Aranda <maurooaranda@gmail.com>
Date: Fri, 21 Oct 2022 10:45:27 +0000 (-0300)
Subject: Fix last change in perl-mode
X-Git-Tag: emacs-29.0.90~1616^2~513
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4b40b790ae003032daa612807bc59e17f2c29dca;p=emacs.git

Fix last change in perl-mode

* lisp/progmodes/perl-mode.el (perl--syntax-exp-intro-regexp): Escape
$.  Reported by Mattias Engdegård.
---

diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index c5d5d703fc9..db9df672797 100644
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -223,7 +223,7 @@
             (regexp-opt perl--syntax-exp-intro-keywords)
             ;; A HERE document as an argument to printf?
             ;; when printing to a filehandle.
-            "\\|printf?[ \t]*$?[_[:alpha:]][_[:alnum:]]*"
+            "\\|printf?[ \t]*\\$?[_[:alpha:]][_[:alnum:]]*"
             "\\|=>"
             "\\|[?:.,;|&*=!~({[]"
             "\\|[^-+][-+]"    ;Bug#42168: `+' is intro but `++' isn't!