diff options
Diffstat (limited to 'lisp/progmodes/perl-mode.el')
| -rw-r--r-- | lisp/progmodes/perl-mode.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index ff0b6a331bc..127b24cb890 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el | |||
| @@ -214,7 +214,9 @@ | |||
| 214 | (defconst perl--syntax-exp-intro-regexp | 214 | (defconst perl--syntax-exp-intro-regexp |
| 215 | (concat "\\(?:\\(?:^\\|[^$@&%[:word:]]\\)" | 215 | (concat "\\(?:\\(?:^\\|[^$@&%[:word:]]\\)" |
| 216 | (regexp-opt perl--syntax-exp-intro-keywords) | 216 | (regexp-opt perl--syntax-exp-intro-keywords) |
| 217 | "\\|[-?:.,;|&+*=!~({[]\\|\\(^\\)\\)[ \t\n]*"))) | 217 | "\\|[?:.,;|&*=!~({[]" |
| 218 | "\\|[^-+][-+]" ;Bug#42168: `+' is intro but `++' isn't! | ||
| 219 | "\\|\\(^\\)\\)[ \t\n]*"))) | ||
| 218 | 220 | ||
| 219 | (defun perl-syntax-propertize-function (start end) | 221 | (defun perl-syntax-propertize-function (start end) |
| 220 | (let ((case-fold-search nil)) | 222 | (let ((case-fold-search nil)) |