Add new todo states to #emacs and orgmode

emacs/.config/doom/+org.el

@@ -36,14 +36,15 @@
                "*  %?\nEntered on %U\n"))
 
         org-todo-keywords
-            '((sequence "TODO(t)" "NEXT(n)" "WAITING(w)" "MAYBE(m)" "|" "DONE(d)"))
+            '((sequence "TODO(t)" "NEXT(n)" "MAYBE(m)" "|" "DONE(d)" "WONTDO(w)"))
 
         org-todo-keyword-faces
             '((("TODO" . (:foreground "red" :weight bold))
                ("NEXT" . (:foreground "blue"))
                ("MAYBE" . (:foreground "sea green"))
-               ("WAITING" . (:foreground "forest green")))
-               ("DONE" . (:foreground "light sea green")))
+               ("WAITING" . (:foreground "forest green"))
+               ("WONTDO" . (:foreground "forest green"))
+               ("DONE" . (:foreground "light sea green"))))
 
         org-agenda-span 5
         org-agenda-start-day "1d"

emacs/.config/doom/config.el

@@ -166,6 +166,18 @@
       message-sendmail-extra-arguments '("--read-envelope-from")
       mail-envelope-from 'header)
 
+;;; It is the opposite of fill-paragraph
+(defun unfill-paragraph ()
+  "Takes a multi-line paragraph and makes it into a single line of text."
+  (interactive)
+  (let ((fill-column (point-max)))
+    (fill-paragraph nil)))
+;; Handy key definition
+(define-key global-map "\M-z" 'unfill-paragraph)
+
+(achievements-mode)
+(nyan-mode)
+
 (add-to-list 'auto-mode-alist '("\\.plantuml\\'" . planetuml-mode))
 
 (load! "+ui.el")

emacs/.config/doom/packages.el

@@ -55,6 +55,9 @@
 (package! deadgrep)
 (package! kaolin-themes)
 (package! magit-circleci)
+(package! achievements)
+(package! nyan-mode)
+
 ; provides typographical replacements
 (package! typo)