fix removal of unread hook when filtering messages

This commit is contained in:
Max Nickel 2019-10-24 18:33:38 -04:00
parent 00ec885eaa
commit 5b3989f3e1
2 changed files with 3 additions and 3 deletions

View file

@ -119,7 +119,7 @@
(notmuch-show-refresh-view t))
;;;###autoload
(defun +notmuch-expand-only-unread-h ()
(defun +notmuch-show-expand-only-unread-h ()
(interactive)
(let ((unread nil)
(open (notmuch-show-get-message-ids-for-open-messages)))
@ -127,7 +127,7 @@
(when (member "unread" (notmuch-show-get-tags))
(setq unread t))))
(when unread
(let ((notmuch-show-hook (remove '+notmuch/expand-only-unread-hook notmuch-show-hook)))
(let ((notmuch-show-hook (remove '+notmuch-show-expand-only-unread-h notmuch-show-hook)))
(notmuch-show-filter-thread "tag:unread")))))
;;