General minor refactor + cleanup

modules/feature/evil/config.el

@@ -143,6 +143,8 @@ across windows."
   (evil-define-interactive-code "<//g>"
     :ex-arg global-match (list (when (evil-ex-p) evil-ex-argument)))
 
+  ;; Forward declare these so that ex completion works, even if the autoloaded
+  ;; functions aren't loaded yet.
   (evil-set-command-properties
    '+evil:align :move-point t :ex-arg 'buffer-match :ex-bang t :evil-mc t :keep-visual t :suppress-operator t)
   (evil-set-command-properties

modules/feature/jump/config.el

@@ -33,10 +33,12 @@ produces an url. Used by `+jump/online'.")
   "Function to use to open search urls.")
 
 (defvar +jump-function-alist nil
-  "TODO")
+  "An alist mapping major modes to jump function plists, describing what to do
+with `+jump/definition', `+jump/references' and `+jump/documentation' are
+called.")
 
 (defvar-local +jump-current-functions nil
-  "TODO")
+  "The enabled jump functions for the current buffer.")
 
 (def-setting! :jump (modes &rest plist)
   "Definies a jump target for major MODES. PLIST accepts the following

modules/feature/version-control/config.el

@@ -1,10 +1,7 @@
 ;;; feature/version-control/config.el -*- lexical-binding: t; -*-
 
-(unless (featurep! -git)
-  (load! +git))
-;; TODO hg support
-;; (unless (featurep! -hg)
-;;   (load! +hg))
+(or (featurep! -git) (load! +git))
+;; TODO (or (featurep! -hg)  (load! +hg))
 
 ;;
 (setq vc-make-backup-files nil)

modules/lang/emacs-lisp/config.el

@@ -7,13 +7,13 @@
   (set! :eval 'emacs-lisp-mode #'+emacs-lisp-eval)
   (set! :jump 'emacs-lisp-mode :documentation #'describe-symbol)
   (set! :rotate 'emacs-lisp-mode
-        :symbols '(("t" "nil")
-                   ("let" "let*")
-                   ("when" "unless")
-                   ("append" "prepend")
-                   ("advice-add" "advice-remove")
-                   ("add-hook" "remove-hook")
-                   ("add-hook!" "remove-hook!")))
+    :symbols '(("t" "nil")
+               ("let" "let*")
+               ("when" "unless")
+               ("append" "prepend")
+               ("advice-add" "advice-remove")
+               ("add-hook" "remove-hook")
+               ("add-hook!" "remove-hook!")))
 
   (add-hook! 'emacs-lisp-mode-hook
     #'(;; 3rd-party functionality

modules/lang/ledger/config.el

@@ -3,15 +3,13 @@
 (def-package! ledger-mode
   :mode "\\.ledger$"
   :commands ledger-mode
-  :config
-  (setq ledger-clear-whole-transactions 1))
+  :config (setq ledger-clear-whole-transactions 1))
 
 
 (def-package! evil-ledger
   :when (featurep! :feature evil)
   :after ledger-mode
-  :config
-  (add-hook 'ledger-mode-hook #'evil-ledger-mode))
+  :config (add-hook 'ledger-mode-hook #'evil-ledger-mode))
 
 
 (def-package! flycheck-ledger

modules/org/org/autoload/org.el

@@ -8,8 +8,9 @@
   :group 'evil-org
   (setq org-hide-emphasis-markers +org-pretty-mode)
   (org-toggle-pretty-entities)
-  ;; In case the above un-align tables
-  (org-table-map-tables 'org-table-align t))
+  (org-with-silent-modifications
+   ;; In case the above un-align tables
+   (org-table-map-tables 'org-table-align t)))
 
 ;;;###autoload
 (defun +org|realign-table-maybe ()

modules/private/hlissner/+commands.el

@@ -42,8 +42,6 @@
 (ex! "grevert"     #'git-gutter:revert-hunk)
 
 ;; Dealing with buffers
-(evil-set-command-properties #'+workspace/cleanup :ex-bang t)
-
 (ex! "clean[up]"   #'+workspace/cleanup)
 (ex! "k[ill]"      #'doom/kill-this-buffer)
 (ex! "k[ill]all"   #'+hlissner:kill-all-buffers)

modules/tools/term/autoload.el

@@ -24,4 +24,4 @@ current project's root."
 (defun +term/open-popup-in-project ()
   "Open a terminal popup window in the root of the current project."
   (interactive)
-  (+term/popup t))
+  (+term/open-popup t))