diff options
Diffstat (limited to '.emacs.d')
| -rw-r--r-- | .emacs.d/rul-emacs.org | 6 | ||||
| -rw-r--r-- | .emacs.d/rul-lisp/packages/rul-mail.el | 6 |
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) |