diff options
author | Mauro Aranda <maurooaranda@gmail.com> | 2022-10-21 07:45:27 -0300 |
---|---|---|
committer | Mauro Aranda <maurooaranda@gmail.com> | 2022-10-21 07:45:27 -0300 |
commit | 4b40b790ae003032daa612807bc59e17f2c29dca (patch) | |
tree | 4743dad62ae4709b8ac7f466ed427c511f24517c /lisp/progmodes/perl-mode.el | |
parent | 3ad9ac25a86b1ef98e27efebfb920780eca4bb77 (diff) | |
download | emacs-4b40b790ae003032daa612807bc59e17f2c29dca.tar.gz |
Fix last change in perl-mode
* lisp/progmodes/perl-mode.el (perl--syntax-exp-intro-regexp): Escape
$. Reported by Mattias EngdegÄrd.
Diffstat (limited to 'lisp/progmodes/perl-mode.el')
-rw-r--r-- | lisp/progmodes/perl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
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! |