branch: elpa/rpm-spec-mode
commit f099e01fdb74cf4c18d7846572cb4b4d15c95fdc
Author: Björn Bidar <bjorn.bi...@thaodan.de>
Commit: Björn Bidar <bjorn.bi...@thaodan.de>
Fix font-lock
Instead of manually setting font-lock-defaults manually which fixes
the font-lock-display and allows ruse the font-lock keywords from
shell-script-mode.
Signed-off-by: Björn Bidar <bjorn.bi...@thaodan.de>
---
rpm-spec-mode.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/rpm-spec-mode.el b/rpm-spec-mode.el
index 6da799b558..7cf756b5fa 100644
--- a/rpm-spec-mode.el
+++ b/rpm-spec-mode.el
@@ -601,7 +601,8 @@ value returned by function `user-mail-address'."
(defvar rpm-spec-font-lock-keywords
- `((cons rpm-section-regexp rpm-spec-section-face)
+ (list
+ (cons rpm-section-regexp rpm-spec-section-face)
'("%[a-zA-Z0-9_]+" 0 rpm-spec-macro-face)
(cons (concat "^" rpm-obsolete-tags-regexp "\\(\([a-zA-Z0-9,_]+\)\\)[
\t]*:")
'((1 'rpm-spec-obsolete-tag-face)
@@ -722,7 +723,7 @@ with no args, if that value is non-nil."
; (setq comment-indent-function 'c-comment-indent)
;;Initialize font lock for GNU emacs.
(make-local-variable 'font-lock-defaults)
- (setq font-lock-defaults '(rpm-spec-font-lock-keywords nil))
+ (font-lock-add-keywords nil rpm-spec-font-lock-keywords)
(rpm-spec-mode-imenu-setup)
(run-hooks 'rpm-spec-mode-hook))
