fix(emacs): add hl-todo configuration

Signed-off-by: Lucas Sta Maria <lucas@priime.dev>

.emacs.d/include/misc.el

@@ -161,6 +161,27 @@
 (keymap-global-set "C-c r r" #'consult-ripgrep)
 (keymap-global-set "C-c r g" #'consult-grep)
 
+;; hl-todo
+(custom-set-faces
+ '(hl-todo ((t (:inherit nano-salient-i)))))
+(setq hl-todo-keyword-faces
+      '(("HOLD" .   "#ffffff")
+        ("TODO" .   "#ffffff")
+        ("NEXT" .   "#ffffff")
+        ("THEM" .   "#ffffff")
+        ("PROG" .   "#ffffff")
+        ("OKAY" .   "#ffffff")
+        ("DONT" .   "#ffffff")
+        ("FAIL" .   "#ffffff")
+        ("DONE" .   "#ffffff")
+        ("NOTE" .   "#ffffff")
+        ("MAYBE" .  "#ffffff")
+        ("KLUDGE" . "#ffffff")
+        ("HACK" .   "#ffffff")
+        ("TEMP" .   "#ffffff")
+        ("FIXME" .  "#ffffff")
+        ("XXXX*" .  "#ffffff")))
+
 ;; Grading
 (defun grade-next (&optional inc)
   "Go to the next homework by INC to grade."

.emacs.d/init.el

@@ -40,6 +40,7 @@
 (straight-use-package 'neotree)
 (straight-use-package 'all-the-icons)
 (straight-use-package 'git-gutter)
+(straight-use-package 'hl-todo)
 (straight-use-package '(nano-theme :type git :host github
                                    :repo "rougier/nano-theme"))
 
@@ -147,6 +148,8 @@
 (add-hook 'company-mode-hook    'company-box-mode)
 
 (add-hook 'prog-mode-hook       #'git-gutter-mode)
+(add-hook 'prog-mode-hook       #'hl-todo-mode)
+
 (add-hook 'racket-mode-hook     #'lsp)
 (add-hook 'rustic-mode-hook     #'lsp)
 (add-hook 'python-mode-hook     #'lsp)