[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-28 ee9a9fbf0f: ; cperl-mode.el: Fix one match-count in my commit 2
From: |
Harald Jörg |
Subject: |
emacs-28 ee9a9fbf0f: ; cperl-mode.el: Fix one match-count in my commit 2021-09-14 |
Date: |
Thu, 20 Oct 2022 15:00:59 -0400 (EDT) |
branch: emacs-28
commit ee9a9fbf0fff9031cf8eb544f5670906ef3c7bb2
Author: Harald Jörg <haj@posteo.de>
Commit: Harald Jörg <haj@posteo.de>
; cperl-mode.el: Fix one match-count in my commit 2021-09-14
* lisp/progmodes/cperl-mode.el (cperl-init-faces): Matching group needs
to be adjusted according to the regexp change in my previous commit
(cherry picked from commit a25e91593d48a541b5940a2ed707ddfaef5c953f)
---
lisp/progmodes/cperl-mode.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index eaedf987c5..7d121cbf94 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -5946,7 +5946,7 @@ default function."
(eval cperl--basic-identifier-rx)))
(0+ blank) "(")
;; '("\\<for\\(each\\)?\\([ \t]+\\(state\\|my\\|local\\|our\\)\\)?[
\t]*\\(\\$[a-zA-Z_][a-zA-Z_0-9]*\\)[ \t]*("
- 4 font-lock-variable-name-face)
+ 1 font-lock-variable-name-face)
;; Avoid $!, and s!!, qq!! etc. when not fontifying syntactically
'("\\(?:^\\|[^smywqrx$]\\)\\(!\\)" 1 font-lock-negation-char-face)
'("\\[\\(\\^\\)" 1 font-lock-negation-char-face prepend)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-28 ee9a9fbf0f: ; cperl-mode.el: Fix one match-count in my commit 2021-09-14,
Harald Jörg <=