diff --git a/modules/email/notmuch/autoload.el b/modules/email/notmuch/autoload.el index 49fdd745f..5ea31a47a 100644 --- a/modules/email/notmuch/autoload.el +++ b/modules/email/notmuch/autoload.el @@ -12,7 +12,7 @@ (if-let* ((buf (cl-find-if (lambda (it) (string-match-p "^\\*notmuch" (buffer-name (window-buffer it)))) (doom-visible-windows)))) (select-window (get-buffer-window buf)) - (notmuch-search "tag:inbox")) + (funcall +notmuch-home-function)) (+workspace/display)) ('error (+notmuch/quit) diff --git a/modules/email/notmuch/config.el b/modules/email/notmuch/config.el index 7cf7c8ccd..773116085 100644 --- a/modules/email/notmuch/config.el +++ b/modules/email/notmuch/config.el @@ -2,6 +2,9 @@ ;; FIXME This module is a WIP! +(defvar +notmuch-home-function #'notmuch + "Function for customizing the landing page for doom-emacs =notmuch.") + (defvar +notmuch-sync-backend 'gmi "Which backend to use. Can be either gmi, mbsync, offlineimap or nil (manual).") @@ -27,8 +30,6 @@ (set-popup-rule! "^\\*notmuch-hello" :side 'left :size 30 :ttl 0) (setq notmuch-fcc-dirs nil - notmuch-show-logo nil - notmuch-message-headers-visible nil message-kill-buffer-on-exit t message-send-mail-function 'message-send-mail-with-sendmail notmuch-search-oldest-first nil @@ -42,9 +43,6 @@ ("tags" . "(%s)")) notmuch-tag-formats '(("unread" (propertize tag 'face 'notmuch-tag-unread))) - notmuch-hello-sections - '(notmuch-hello-insert-saved-searches - notmuch-hello-insert-alltags) notmuch-saved-searches '((:name "inbox" :query "tag:inbox not tag:trash" :key "i") (:name "flagged" :query "tag:flagged" :key "f") @@ -52,8 +50,6 @@ (:name "drafts" :query "tag:draft" :key "d")) notmuch-archive-tags '("-inbox" "-unread")) - ;; (setq-hook! 'notmuch-show-mode-hook line-spacing 0) - ;; only unfold unread messages in thread by default (add-hook 'notmuch-show-hook #'+notmuch-show-expand-only-unread-h)