diff options
| author | Daniel Pfeiffer | 2005-05-05 19:20:03 +0000 |
|---|---|---|
| committer | Daniel Pfeiffer | 2005-05-05 19:20:03 +0000 |
| commit | 9ed9fd3572ef8b4c2bf19e64fbb19823215cc3d8 (patch) | |
| tree | 4f61f0ae54bf238b5d7d52fece6368dd2abf535c | |
| parent | b854556ff5e9a70efff7a46915a9804c257700c3 (diff) | |
| download | emacs-9ed9fd3572ef8b4c2bf19e64fbb19823215cc3d8.tar.gz emacs-9ed9fd3572ef8b4c2bf19e64fbb19823215cc3d8.zip | |
Avoid $! for font-lock-negation-char-face.
| -rw-r--r-- | lisp/progmodes/cperl-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 35957457a9a..e32a43ede9e 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el | |||
| @@ -4752,8 +4752,8 @@ indentation and initial hashes. Behaves usually outside of comment." | |||
| 4752 | 3 font-lock-variable-name-face))) | 4752 | 3 font-lock-variable-name-face))) |
| 4753 | '("\\<for\\(each\\)?\\([ \t]+\\(my\\|local\\|our\\)\\)?[ \t]*\\(\\$[a-zA-Z_][a-zA-Z_0-9]*\\)[ \t]*(" | 4753 | '("\\<for\\(each\\)?\\([ \t]+\\(my\\|local\\|our\\)\\)?[ \t]*\\(\\$[a-zA-Z_][a-zA-Z_0-9]*\\)[ \t]*(" |
| 4754 | 4 font-lock-variable-name-face) | 4754 | 4 font-lock-variable-name-face) |
| 4755 | ;; Avoid s!!, qq!! etc. when not fontifying syntaxically | 4755 | ;; Avoid $!, and s!!, qq!! etc. when not fontifying syntaxically |
| 4756 | '("\\(?:^\\|[^smywqrx]\\)\\(!\\)" 1 font-lock-negation-char-face) | 4756 | '("\\(?:^\\|[^smywqrx$]\\)\\(!\\)" 1 font-lock-negation-char-face) |
| 4757 | '("\\[\\(\\^\\)" 1 font-lock-negation-char-face prepend))) | 4757 | '("\\[\\(\\^\\)" 1 font-lock-negation-char-face prepend))) |
| 4758 | (setq | 4758 | (setq |
| 4759 | t-font-lock-keywords-1 | 4759 | t-font-lock-keywords-1 |