私はこれを私のナビマイナーモードに使用します:
;; Adding Navi to the syntax highlighting of emacs mode.
最初に、新しい顔をその色で作成します。私の場合、文字「t」の成功フォントは緑、「ナビ」と「ナビ」はシアンです。
必要に応じて、 font-lockについてお読みください。
(make-face 'font-lock-Navi-face)
(set-face-foreground 'font-lock-Navi-face "cyan")
(make-face 'font-lock-success-face)
(set-face-attribute 'font-lock-success-face nil :foreground "green")
次に、アタッチする「キーワード」(正規表現)を追加します。
(defun add-custom-keywords()
"adds a few keywords for emacs mode"
;
(font-lock-add-keywords nil
'(
("Navi\\|navi" . 'font-lock-Navi-face)
;; here you can see that I highlight the letter "t" in " t " when spaced,
;; or with a parenthesis\newline around it
("\\s-t\\s-\\|\\s-t)\\|\\s-t\n" . 'font-lock-success-face)
)
)
)
"\\|"
Navi(「または」はここにあります)またはnaviを単に文字「a」または「b」に置き換えることができるので"a\\|b"
、それに顔を付けます。
; This is the hook to activate when the mode is triggered
(add-hook 'emacs-lisp-mode-hook 'add-custom-keywords)
最後の部分では、このフォントが「リアルタイム」であり、ファイルを開くたびに確実になります。