General cleanup & refactor; update TODO

modules/private/hlissner/+bindings.el

@@ -5,12 +5,14 @@
       x-alt-keysym   'meta)
 
 (defmacro find-file-in! (path &optional project-p)
-  "Returns an interactive function for searching files"
+  "Returns an interactive function for searching files."
   `(lambda () (interactive)
      (let ((default-directory ,path))
        (call-interactively
         ',(command-remapping
-           (if project-p 'projectile-find-file) 'find-file)))))
+           (if project-p
+               #'projectile-find-file
+             #'find-file))))))
 
 (map!
  [remap evil-jump-to-tag] #'projectile-find-tag
@@ -76,27 +78,27 @@
  :m ";" 'evil-ex
  (:leader
    ;; Most commonly used
-   :desc "Switch project buffer"    :n ","  #'persp-switch-to-buffer
-   :desc "Switch buffer"            :n "<"  #'switch-to-buffer
-   :desc "Browse files"             :n "."  #'find-file
-   :desc "Find file from here"      :n ">"  #'counsel-file-jump
-   :desc "Find file in project"     :n "/"  #'projectile-find-file
-   :desc "Find in file (swiper)"    :n "?"  #'swiper
-   :desc "Imenu"                    :n ";"  #'imenu
-   :desc "Imenu across buffers"     :n ":"  #'imenu-anywhere
-   :desc "Find other file"          :n "a"  #'projectile-find-other-file
-   :desc "Jump to bookmark"         :n "b"  #'bookmark-jump
-   :desc "Delete bookmark"          :n "B"  #'bookmark-delete
-   :desc "List errors"              :n "e"  #'flycheck-list-errors
-   :desc "View Emacs Log"           :n "m"  #'doom/popup-toggle-messages
-   :desc "Recent files"             :n "r"  #'recentf
-   :desc "Recent project files"     :n "R"  #'projectile-recentf
-   :desc "Insert from kill ring"    :n "y"  #'counsel-yank-pop
-   :desc "Switch project"           :n "p"  #'projectile-switch-project
-   :desc "Open Neotree"             :n "\\" #'+evil/neotree
+   :desc "Switch project buffer" :n ","  #'persp-switch-to-buffer
+   :desc "Switch buffer"         :n "<"  #'switch-to-buffer
+   :desc "Browse files"          :n "."  #'find-file
+   :desc "Find file from here"   :n ">"  #'counsel-file-jump
+   :desc "Find file in project"  :n "/"  #'projectile-find-file
+   :desc "Find in file (swiper)" :n "?"  #'swiper
+   :desc "Imenu"                 :n ";"  #'imenu
+   :desc "Imenu across buffers"  :n ":"  #'imenu-anywhere
+   :desc "Find other file"       :n "a"  #'projectile-find-other-file
+   :desc "Jump to bookmark"      :n "b"  #'bookmark-jump
+   :desc "Delete bookmark"       :n "B"  #'bookmark-delete
+   :desc "List errors"           :n "e"  #'flycheck-list-errors
+   :desc "View Emacs Log"        :n "m"  #'doom/popup-toggle-messages
+   :desc "Recent files"          :n "r"  #'recentf
+   :desc "Recent project files"  :n "R"  #'projectile-recentf
+   :desc "Insert from kill ring" :n "y"  #'counsel-yank-pop
+   :desc "Switch project"        :n "p"  #'projectile-switch-project
+   :desc "Open Neotree"          :n "\\" #'+evil/neotree
 
    ;; Since I've remapped C-h...
-   :desc "help"                     :n "h"  #'help-command
+   :desc "help"                  :n "h"  #'help-command
 
    (:desc "quit"
      :prefix "q"
@@ -303,7 +305,7 @@
  ;; rotate-text
  :n  "!"   #'rotate-text
  ;; hide-show/evil-matchit
- :nv "<tab>" #'+evil/matchit-or-toggle-fold
+ :nv [tab] #'+evil/matchit-or-toggle-fold
 
  ;; help-mode
  (:map help-mode-map

modules/private/hlissner/autoload/hlissner.el

@@ -12,7 +12,7 @@ private/hlissner/snippets."
 (defun +hlissner/C-u-M-x ()
   "Invokes `execute-extended-command' with the universal argument."
   (interactive)
-  (let ((current-prefix-arg 1))
+  (let ((current-prefix-arg 4))
     (call-interactively #'execute-extended-command)))
 
 (defmacro +hlissner-def-finder! (name dir)

modules/ui/doom-modeline/config.el

@@ -34,7 +34,7 @@
 ;; anzu and evil-anzu make it possible to display current/total in the
 ;; mode-line.
 (def-package! evil-anzu
-  :when (featurep! :feature evil)
+  :when (featurep 'evil)
   :init
   (add-transient-hook! evil-ex-start-search (require 'evil-anzu))
   :config

modules/ui/doom-modeline/packages.el

@@ -3,8 +3,6 @@
 
 ;;; These are the invisible dependencies
 ;; Required
-;;(require 'f)
-;;(require 's)
 ;;(require 'evil)
 ;;(require 'projectile)
 ;;(require 'all-the-icons)
@@ -12,7 +10,6 @@
 ;; Optional
 ;;(require 'flycheck)
 ;;(require 'anzu)
-;;(require 'evil-anzu)
 ;;(require 'iedit)
 ;;(require 'evil-multiedit)
 

modules/ui/doom/config.el

@@ -126,7 +126,7 @@
   (advice-add #'recenter :around #'doom*blink-cursor-maybe)
 
   (after! evil
-    (advice-add #'evil-window-top :after #'doom/blink-cursor)
+    (advice-add #'evil-window-top    :after #'doom/blink-cursor)
     (advice-add #'evil-window-middle :after #'doom/blink-cursor)
     (advice-add #'evil-window-bottom :after #'doom/blink-cursor)))
 
@@ -140,7 +140,7 @@
     "Face to hightlight `hideshow' overlays."
     :group 'doom)
 
-  ;; Nicer code-folding overlays
+  ;; Nicer code-folding overlays (with fringe indicators)
   (setq hs-set-up-overlay
         (lambda (ov)
           (when (eq 'code (overlay-get ov 'hs))
@@ -159,7 +159,7 @@
   (after! flycheck
     ;; because git-gutter is in the left fringe
     (setq flycheck-indication-mode 'right-fringe)
-
+    ;; A non-descript, left-pointing arrow
     (define-fringe-bitmap 'flycheck-fringe-bitmap-double-arrow
       [0 0 0 0 0 4 12 28 60 124 252 124 60 28 12 4 0 0 0 0]))