From b474df9609155ffc3710cf766af5f3a9791b217e Mon Sep 17 00:00:00 2001
From: Bozhidar Batsov <bozhidar@tradeo.com>
Date: Wed, 24 Jul 2013 16:13:32 +0300
Subject: [PATCH] Cleanup comment annotation highlighting a bit
---
modules/prelude-programming.el | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/modules/prelude-programming.el b/modules/prelude-programming.el
index 2e0638e..271fa9a 100644
--- a/modules/prelude-programming.el
+++ b/modules/prelude-programming.el
@@ -90,9 +90,12 @@
(defun prelude-local-comment-auto-fill ()
(set (make-local-variable 'comment-auto-fill-only-comments) t))
-(defun prelude-add-watchwords ()
+(defun prelude-add-comment-annotations ()
+ "Highlight a bunch of well known comment annotations.
+
+This functions should be added to the hooks of major modes for programming."
(font-lock-add-keywords
- nil '(("\\<\\(FIX\\|TODO\\|FIXME\\|HACK\\|REFACTOR\\):"
+ nil '(("\\<\\(FIX\\(ME\\)?\\|TODO\\|OPTIMIZE\\|HACK\\|REFACTOR\\):"
1 font-lock-warning-face t))))
;; show the name of the current function definition in the modeline
@@ -119,7 +122,7 @@
(guru-mode +1))
(prelude-enable-whitespace)
(prelude-local-comment-auto-fill)
- (prelude-add-watchwords))
+ (prelude-add-comment-annotations))
(setq prelude-prog-mode-hook 'prelude-prog-mode-defaults)