aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRaul Benencia <id@rbenencia.name>2026-04-14 22:19:38 -0700
committerRaul Benencia <id@rbenencia.name>2026-04-14 22:19:38 -0700
commit4804edb594ed5905752ba4c111eea44e8fda84d5 (patch)
tree1b3e88dd1118f6af527b19c48b789ad92dd5d958
parent90c1704f870aaafac7fb181e954b29740b39f7d1 (diff)
emacs: cheaper notmuch refreshHEADmaster
-rw-r--r--.emacs.d/rul-emacs.org6
-rw-r--r--.emacs.d/rul-lisp/packages/rul-mail.el6
2 files changed, 12 insertions, 0 deletions
diff --git a/.emacs.d/rul-emacs.org b/.emacs.d/rul-emacs.org
index 3fb06b3..f68007d 100644
--- a/.emacs.d/rul-emacs.org
+++ b/.emacs.d/rul-emacs.org
@@ -703,6 +703,12 @@ Emacs can act as Mail User Agent. My preferred package for this is
(bind-key "c" 'rul/capture-mail notmuch-show-mode-map)
+ ;; Keep uppercase refresh cheap after tag operations; use M-g for a full poll.
+ (define-key notmuch-show-mode-map "G" 'notmuch-refresh-this-buffer)
+ (define-key notmuch-search-mode-map "G" 'notmuch-refresh-this-buffer)
+ (define-key notmuch-show-mode-map (kbd "M-g") 'notmuch-poll-and-refresh-this-buffer)
+ (define-key notmuch-search-mode-map (kbd "M-g") 'notmuch-poll-and-refresh-this-buffer)
+
(define-key notmuch-show-mode-map "R" 'notmuch-show-reply)
(define-key notmuch-search-mode-map "R" 'notmuch-search-reply-to-thread)
diff --git a/.emacs.d/rul-lisp/packages/rul-mail.el b/.emacs.d/rul-lisp/packages/rul-mail.el
index 6206118..4af5cc7 100644
--- a/.emacs.d/rul-lisp/packages/rul-mail.el
+++ b/.emacs.d/rul-lisp/packages/rul-mail.el
@@ -29,6 +29,12 @@
(bind-key "c" 'rul/capture-mail notmuch-show-mode-map)
+ ;; Keep uppercase refresh cheap after tag operations; use M-g for a full poll.
+ (define-key notmuch-show-mode-map "G" 'notmuch-refresh-this-buffer)
+ (define-key notmuch-search-mode-map "G" 'notmuch-refresh-this-buffer)
+ (define-key notmuch-show-mode-map (kbd "M-g") 'notmuch-poll-and-refresh-this-buffer)
+ (define-key notmuch-search-mode-map (kbd "M-g") 'notmuch-poll-and-refresh-this-buffer)
+
(define-key notmuch-show-mode-map "R" 'notmuch-show-reply)
(define-key notmuch-search-mode-map "R" 'notmuch-search-reply-to-thread)
nihil fit ex nihilo