From 48dcdbfec71696f923254a2f48442d9565d3c1e4 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Thu, 27 Apr 2017 13:41:46 -0400 Subject: [PATCH] lang/org: fontify checked checbox items with 'org-headline-done' --- modules/lang/org/config.el | 17 +++++++++++++++-- 1 file changed, 15 insertions(+), 2 deletions(-) diff --git a/modules/lang/org/config.el b/modules/lang/org/config.el index 8307b57be..de7b25189 100644 --- a/modules/lang/org/config.el +++ b/modules/lang/org/config.el @@ -181,9 +181,22 @@ '((t (:inherit font-lock-keyword-face))) "Face for list bullets" :group 'doom) + ;; I like how org-mode fontifies checked TODOs and want this to extend to + ;; checked checkbox items, so we remove the old checkbox highlight rule... + (font-lock-remove-keywords + 'org-mode + '(("^[ \t]*\\(?:[-+*]\\|[0-9]+[.)]\\)[ \t]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\(\\[[- X]\\]\\)" + 1 'org-checkbox prepend))) (font-lock-add-keywords - 'org-mode '(("^ *\\([-+]\\|[0-9]+[).]\\) " (1 'org-list-bullet)) - ("^ *\\(-----+\\)$" (1 'org-meta-line)))) + 'org-mode '(;; ...and replace it with my own + ("^[ \t]*\\(\\(?:[-+]\\|[0-9]+[).]\\)[ \t]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\[X\\][^\n]*\n\\)" + 1 'org-headline-done t) + ("^[ \t]*\\(?:[-+*]\\|[0-9]+[.)]\\)[ \t]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\(\\[[- ]\\]\\)" + 1 'org-checkbox prepend) + ;; Also highlight list bullets + ("^ *\\([-+]\\|[0-9]+[).]\\) " 1 'org-list-bullet append) + ;; and separators + ("^ *\\(-----+\\)$" 1 'org-meta-line))) ;; Enable gpg support (require 'epa-file)