Emacs: Remove custom TODO faces, leave it to hl-todo
parent
4b5cec6fd3
commit
497adf2404
|
@ -122,19 +122,6 @@
|
||||||
;; ;; Signature (multi-line regexes are a bit flaky).
|
;; ;; Signature (multi-line regexes are a bit flaky).
|
||||||
;; ("^--.*\\(\n.*\\)*" . font-lock-comment-face)))
|
;; ("^--.*\\(\n.*\\)*" . font-lock-comment-face)))
|
||||||
|
|
||||||
;;; Key notes highlighting. We need to apply it to the mode hook since
|
|
||||||
;;; font-lock-add-keywords has no inheritance support.
|
|
||||||
;; (set-face-foreground 'font-lock-warning-face "DarkOrange")
|
|
||||||
;; (defun ambrevar/fontify-comment-tag ()
|
|
||||||
;; (font-lock-add-keywords
|
|
||||||
;; nil
|
|
||||||
;; ;; See https://en.wikipedia.org/wiki/Comment_(computer_programming)#Tags.
|
|
||||||
;; (mapcar
|
|
||||||
;; (lambda (keyword) `(,(concat "\\<\\(" keyword "\\):") 1 font-lock-warning-face prepend))
|
|
||||||
;; '("FIXME\\(([^)]+)\\)?" "HACK" "OPTIMIZE\\(([^)]+)\\)?" "REVIEW\\(([^)]+)\\)?" "TODO\\(([^)]+)\\)?" "UNDONE" "UX" "WARNING" "XXX"))))
|
|
||||||
;; (dolist (hook '(prog-mode-hook text-mode-hook))
|
|
||||||
;; (add-hook hook 'ambrevar/fontify-comment-tag))
|
|
||||||
|
|
||||||
;;; Man pages
|
;;; Man pages
|
||||||
(with-eval-after-load 'man
|
(with-eval-after-load 'man
|
||||||
(set-face-attribute 'Man-underline nil :foreground (face-foreground 'font-lock-string-face) :underline nil)
|
(set-face-attribute 'Man-underline nil :foreground (face-foreground 'font-lock-string-face) :underline nil)
|
||||||
|
|
Loading…
Reference in New Issue