From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 5 Sep 2020 12:36:29 +0000 (+0200)
Subject: Tweak how cperl-mode fontifies hashes and arrays
X-Git-Tag: emacs-28.0.90~6240
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=81657507c296843971e4a921377451ecc3739e5e;p=emacs.git

Tweak how cperl-mode fontifies hashes and arrays

* lisp/progmodes/cperl-mode.el (cperl-init-faces): Fontify hashes
and arrays (%foo and @foo) before the keywords, since the keyword
regexps are "wider" and the hash/array regexp just match those two
things (bug#22867).
---

diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 5dee5007e2e..7a1c2e4d24e 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -5776,8 +5776,8 @@ indentation and initial hashes.  Behaves usually outside of comment."
 		  t-font-lock-keywords)
 		cperl-font-lock-keywords cperl-font-lock-keywords-1
 		cperl-font-lock-keywords-2 (append
-					   cperl-font-lock-keywords-1
-					   t-font-lock-keywords-1)))
+					   t-font-lock-keywords-1
+					   cperl-font-lock-keywords-1)))
 	(if (fboundp 'ps-print-buffer) (cperl-ps-print-init))
 	(if (or (featurep 'choose-color) (featurep 'font-lock-extra))
 	    (eval			; Avoid a warning