diff options
| author | jao <jao@gnu.org> | 2021-06-08 02:53:33 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2021-06-08 02:53:33 +0100 |
| commit | 5f6426fd240bd2e1048e920d4e1016829785c724 (patch) | |
| tree | 5236ac87edfc340ed9aa772adf03bc303f1b70ec /email.org | |
| parent | 63c7742de1cb4ec8d63abd6f8553367531d3847d (diff) | |
| download | elibs-5f6426fd240bd2e1048e920d4e1016829785c724.tar.gz elibs-5f6426fd240bd2e1048e920d4e1016829785c724.tar.bz2 | |
notmuch nits
Diffstat (limited to 'email.org')
| -rw-r--r-- | email.org | 22 |
1 files changed, 14 insertions, 8 deletions
@@ -374,12 +374,12 @@ (setq notmuch-saved-searches `(,(jao-notmuch--q "bigml" "inbox" "bi") - ,@(jao-notmuch--mboxes-search "bigml" "inbox" "deploys") + ,@(jao-notmuch--mboxes-search "bigml" "inbox") ,(jao-notmuch--q "jao" "inbox" "ji") ,@(jao-notmuch--mboxes-search "jao" "inbox") ,@(jao-notmuch--mboxes-search "feeds") ,(jao-notmuch--q "gmane/emacs" nil "e" - '("tag:gmane" "tag:new" "List:emacs")) + '("tag:gmane" "tag:new" "tag:emacs")) ,(jao-notmuch--q "gmane" nil "g" '("tag:gmane" "tag:new")) ,(jao-notmuch--q "bml/today" nil "tb" '("tag:bigml" "date:1d..") t) ,(jao-notmuch--q "jao/today" nil "tj" '("tag:jao" "date:1d..") t) @@ -427,6 +427,12 @@ (interactive) (save-window-excursion (org-agenda-list))) + (defun jao-notmuch-hello-first () + (interactive) + (let ((inhibit-message t)) + (beginning-of-buffer) + (widget-forward 2))) + (defun jao-notmuch-refresh-hello () (interactive) (ignore-errors @@ -434,9 +440,7 @@ (derived-mode-p 'notmuch-hello-mode)) (when (not (string-blank-p jao-notmuch-minibuffer-string)) (let ((notmuch-hello-auto-refresh nil)) (notmuch-hello))) - (let ((inhibit-message t)) - (beginning-of-buffer) - (widget-forward 2))))) + (jao-notmuch-hello-first)))) (defun jao-notmuch-open-enclosure (add) (interactive "P") @@ -460,6 +464,7 @@ (("a" . jao-notmuch-refresh-agenda) ("S" . consult-notmuch) ("g" . jao-notmuch-refresh-hello) + ("." . jao-notmuch-hello-first) ("SPC" . widget-button-press)) :map notmuch-common-keymap (("E" . jao-notmuch-open-enclosure)))) @@ -541,7 +546,8 @@ "Next message or thread in forest or exit if none." (interactive "P") (if thread - (notmuch-tree-next-thread) + (progn (notmuch-tree-next-thread) + (notmuch-tree-show-message nil)) (notmuch-tree-next-matching-message (not no-exit))) (jao-notmuch-tree-update-buffer-name)) @@ -617,8 +623,8 @@ ("h" . jao-notmuch-goto-message-buffer) ("H" . jao-notmuch-click-message-buffer) ("i" . jao-notmuch-toggle-images) - ("k" . jao-notmuch-tag-jump-and-next) - ("K" . jao-notmuch-tree-read-thread) + ("K" . jao-notmuch-tag-jump-and-next) + ("k" . jao-notmuch-tree-read-thread) ("n" . jao-notmuch-tree-next) ("RET" . jao-notmuch-tree-show-or-scroll) ("SPC" . jao-notmuch-tree-scroll-or-next)) |