💥 Refactor add-hook! macro & change arg order
This update may potentially break your usage of add-hook! if you pass the :local or :append properties to it. This is how they used to work: (add-hook! :append 'some-mode-hook #'do-something) Thsoe properties must now follow the hooks, e.g. (add-hook! 'some-mode-hook :append #'do-something) Other changes: - Various add-hook calls have been renamed to add-hook! because I incorrectly assumed `defun` always returned its definition's symbol, when in fact, its return value is "undefined" (so sayeth the documentation). This should fix #1597. - This update adds the ability to add multiple functions to hooks without a list: (add-hook! 'some-mode-hook #'do-something #'do-something-else) - The indentation logic has been changed so that consecutive function symbols at indented at the same level as the first argument, but forms are indent like a defun. (add-hook! 'some-mode-hook #'do-something #'do-something-else) (add-hook! 'some-mode-hook (message "Hello"))
This commit is contained in:
parent
c2ae6f30a5
commit
a3e262c7ac
42 changed files with 248 additions and 225 deletions
|
@ -168,7 +168,7 @@
|
|||
;; Without it, refiling (archiving), trashing, and flagging (starring) email
|
||||
;; won't properly result in the corresponding gmail action, since the marks
|
||||
;; are ineffectual otherwise.
|
||||
(add-hook 'mu4e-mark-execute-pre-hook
|
||||
(add-hook! 'mu4e-mark-execute-pre-hook
|
||||
(defun +mu4e-gmail-fix-flags-h (mark msg)
|
||||
(pcase mark
|
||||
(`trash (mu4e-action-retag-message msg "-\\Inbox,+\\Trash,-\\Draft"))
|
||||
|
|
|
@ -89,7 +89,7 @@
|
|||
;; Advice
|
||||
|
||||
;;;###autoload
|
||||
(defun +notmuch*dont-confirm-on-kill-process (orig-fn &rest args)
|
||||
(defun +notmuch-dont-confirm-on-kill-process-a (orig-fn &rest args)
|
||||
"Don't prompt for confirmation when killing notmuch sentinel."
|
||||
(let (confirm-kill-processes)
|
||||
(apply orig-fn args)))
|
||||
|
|
|
@ -42,13 +42,15 @@
|
|||
|
||||
;; (setq-hook! 'notmuch-show-mode-hook line-spacing 0)
|
||||
|
||||
(add-to-list 'doom-real-buffer-functions #'notmuch-interesting-buffer nil #'eq)
|
||||
(add-hook 'doom-real-buffer-functions #'notmuch-interesting-buffer)
|
||||
|
||||
(advice-add #'notmuch-start-notmuch-sentinel :around #'+notmuch*dont-confirm-on-kill-process)
|
||||
(advice-add #'notmuch-start-notmuch-sentinel :around #'+notmuch-dont-confirm-on-kill-process-a)
|
||||
|
||||
;; modeline doesn't have much use in these modes
|
||||
(add-hook! (notmuch-show-mode notmuch-tree-mode notmuch-search-mode)
|
||||
#'hide-mode-line-mode))
|
||||
(add-hook! '(notmuch-show-mode-hook
|
||||
notmuch-tree-mode-hook
|
||||
notmuch-search-mode-hook)
|
||||
#'hide-mode-line-mode))
|
||||
|
||||
|
||||
(use-package! org-mime
|
||||
|
|
|
@ -74,6 +74,6 @@
|
|||
;; Neither wl-folder-mode or wl-summary-mode are correctly defined as major
|
||||
;; modes, so `evil-set-initial-state' won't work here.
|
||||
(add-hook! '(wl-folder-mode-hook wl-summary-mode-hook)
|
||||
#'evil-emacs-state))
|
||||
#'evil-emacs-state))
|
||||
|
||||
(add-hook 'mime-edit-mode-hook #'auto-fill-mode))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue