nit: minor refactors & comment/docstring revisions

This commit is contained in:
Henrik Lissner 2022-06-21 14:40:15 +02:00
parent 773122f1ec
commit 9d1df5f298
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
8 changed files with 12 additions and 9 deletions

View file

@ -14,9 +14,9 @@
gcmh-verbose gcmh-verbose
init-file-debug init-file-debug
jka-compr-verbose jka-compr-verbose
(message-log-max . 16384)
url-debug url-debug
use-package-verbose use-package-verbose)
(message-log-max . 16384))
"A list of variable to toggle on `doom-debug-mode'. "A list of variable to toggle on `doom-debug-mode'.
Each entry can be a variable symbol or a cons cell whose CAR is the variable Each entry can be a variable symbol or a cons cell whose CAR is the variable

View file

@ -40,6 +40,7 @@ all themes. It will apply to all themes once they are loaded."
(when (or (get 'doom-theme 'previous-themes) (when (or (get 'doom-theme 'previous-themes)
(null doom-theme)) (null doom-theme))
(funcall #',fn)) (funcall #',fn))
;; FIXME Prevent clobbering this on-the-fly
(add-hook 'doom-customize-theme-hook #',fn 100)))) (add-hook 'doom-customize-theme-hook #',fn 100))))
;;;###autoload ;;;###autoload

View file

@ -51,9 +51,9 @@
(setq dir (car tail)) (setq dir (car tail))
(let ((default-directory dir)) (let ((default-directory dir))
(load (expand-file-name "subdirs.el") t inhibit-message t)) (load (expand-file-name "subdirs.el") t inhibit-message t))
(or (string-prefix-p lispdir dir) (unless (string-prefix-p lispdir dir)
(let ((default-directory dir)) (let ((default-directory dir))
(load (expand-file-name "leim-list.el") t inhibit-message t))) (load (expand-file-name "leim-list.el") t inhibit-message t)))
(setq tail (cdr tail))) (setq tail (cdr tail)))
(load site-run-file t inhibit-message)))) (load site-run-file t inhibit-message))))

View file

@ -262,8 +262,8 @@ NAME, ARGLIST, and BODY are the same as `defun', `defun*', `defmacro', and
"Run FORMS without generating any output. "Run FORMS without generating any output.
This silences calls to `message', `load', `write-region' and anything that This silences calls to `message', `load', `write-region' and anything that
writes to `standard-output'. In interactive sessions this won't suppress writing writes to `standard-output'. In interactive sessions this inhibits output to the
to *Messages*, only inhibit output in the echo area." echo-area, but not to *Messages*."
`(if doom-debug-p `(if doom-debug-p
(progn ,@forms) (progn ,@forms)
,(if doom-interactive-p ,(if doom-interactive-p

View file

@ -60,7 +60,7 @@
(autoload 'consult--multi "consult") (autoload 'consult--multi "consult")
;;;###autoload ;;;###autoload
(defun +vertico/switch-workspace-buffer (&optional force-same-workspace) (defun +vertico/switch-workspace-buffer (&optional force-same-workspace)
"Switch to another buffer in the same workspace. "Switch to another buffer in the same or a specified workspace.
Type the workspace's number (starting from 1) followed by a space to display its Type the workspace's number (starting from 1) followed by a space to display its
buffer list. Selecting a buffer in another workspace will switch to that buffer list. Selecting a buffer in another workspace will switch to that

View file

@ -1070,6 +1070,7 @@ between the two."
(set-marker p nil))))) (set-marker p nil)))))
;; TODO Move to +encrypt flag
(use-package! org-crypt ; built-in (use-package! org-crypt ; built-in
:commands org-encrypt-entries org-encrypt-entry org-decrypt-entries org-decrypt-entry :commands org-encrypt-entries org-encrypt-entry org-decrypt-entries org-decrypt-entry
:hook (org-reveal-start . org-decrypt-entry) :hook (org-reveal-start . org-decrypt-entry)

View file

@ -5,7 +5,7 @@
:commands vterm-mode :commands vterm-mode
:hook (vterm-mode . doom-mark-buffer-as-real-h) :hook (vterm-mode . doom-mark-buffer-as-real-h)
:hook (vterm-mode . hide-mode-line-mode) ; modeline serves no purpose in vterm :hook (vterm-mode . hide-mode-line-mode) ; modeline serves no purpose in vterm
:init :preface
;; HACK Because vterm clusmily forces vterm-module.so's compilation on us when ;; HACK Because vterm clusmily forces vterm-module.so's compilation on us when
;; the package is loaded, this is necessary to prevent it when ;; the package is loaded, this is necessary to prevent it when
;; byte-compiling this file (`use-package' blocks eagerly loads packages ;; byte-compiling this file (`use-package' blocks eagerly loads packages

View file

@ -13,6 +13,7 @@
;; ;;
;;; Packages ;;; Packages
;; DEPRECATED To be replaced with pulsar.el when Emacs 28 support is dropped
(use-package! nav-flash (use-package! nav-flash
:defer t :defer t
:init :init