Emacs AUCTeX макросов
Я недавно начал использовать отличный пакет xargs
это обеспечивает \newcommandx
, Синтаксис похож на стандартный \newcommand
, мне бы хотелось font-lock
чтобы отразить это. я сделал
(custom-set-variables
'(font-latex-user-keyword-classes
(quote (("cx" ("newcommandx" "*|{\\[[{")
(:family "font-lock-type-face") command)))))
Но это озвучивает только имя самой команды, а не ее тело (\newcommand
облагораживает тело 'font-lock-function-name-face
, который в моем случае жирный). я хочу \newcommandx
осветить свое тело 'font-lock-function-name-face
,
Резюмируя вопрос: как правильно оформить \newcommandx
быть точно таким же, как для \newcommand
(т.е. смелое тело в моем случае)?
1 ответ
Вот пример, который вы можете изменить в соответствии со своими потребностями. Смотрите строки с 280 по 436 font-latex.el
в auctex-11.86
для полного списка предопределенных ключевых слов. Следующие примеры используются для добавления дополнительных ключевых слов и / или определения собственной окраски содержимого волнистых / квадратных скобок.
;; \EFFECT{[font-lock-function-name-face]}
(setq font-latex-match-function-keywords
'(
("newcommandx" "*|{\\[[{")
)
)
;; \EFFECT{[font-lock-constant-face]}
(setq font-latex-match-reference-keywords
'(
("fancypagestyle" "[{")
("fancyhead" "[{")
("fancyfoot" "[{")
)
)
;; \EFFECT{[font-lock-type-face]}
(setq font-latex-match-textual-keywords
'(
("parentext" "{")
("hybridblockquote" "[{")
("parskip" "")
("footskip" "")
)
)
;; \EFFECT{[font-lock-variable-name-face]}
(setq font-latex-match-variable-keywords
'(
("newgeometry" "[{")
("quotingsetup" "[{")
("TabPositions" "[{")
("rfoot" "")
)
)
;; \font-latex-warning-face
(setq font-latex-match-warning-keywords
'(
("fixme" "{")
)
)
;; only affects inside wavy brackets
(setq font-latex-user-keyword-classes
'(("my-warning-commands"
(("fixme" "{"))
(:foreground "purple" :background "yellow")
command)))
Смотрите также: http://www.gnu.org/software/auctex/manual/auctex/Fontification-of-macros.html
Я выбрал следующий метод, чтобы настроить все мои специальные ключевые слова:
(defvar lawlist-face-01 (make-face 'lawlist-face-01))
(set-face-background 'lawlist-face-01 "black")
(set-face-foreground 'lawlist-face-01 "white")
(set-face-bold-p 'lawlist-face-01 t)
(set-face-italic-p 'lawlist-face-01 t)
(set-face-underline-p 'lawlist-face-01 t)
(set-face-underline 'lawlist-face-01 "yellow")
(defvar lawlist-face-02 (make-face 'lawlist-face-02))
(set-face-attribute 'lawlist-face-02 nil :background "gray" :foreground "red" :font "Courier" :height 180 :bold t :underline "yellow" :italic t)
(font-lock-add-keywords 'latex-mode '(
("\\\\test01\\|insert\\|BUGS\\|FIXME\\|TODO\\|and\\|or\\|not" 0 lawlist-face-01 prepend) ;; 0 = highlight all
("\\\\test02\\|INSERT\\|document-name\\|\\\\begin{document}" 0 lawlist-face-02 prepend) ;; 0 = highlight all
("\\test01{\\([^}]*\\)}" 1 lawlist-face-02 prepend) ;; 1 = colorize contents of wavy brackets
))