From 2d507c9c6db9188b3574f7d50144a918d26b3bb1 Mon Sep 17 00:00:00 2001 From: Carl Worth Date: Tue, 3 Nov 2009 11:47:48 -0800 Subject: [PATCH] notmuch.el: Add an '=' key to refresh the current view. This will allow for updates when a separate process (say, a notmuch- show buffer), has archived messages. --- notmuch.el | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/notmuch.el b/notmuch.el index 545b09c6..c00d3595 100644 --- a/notmuch.el +++ b/notmuch.el @@ -286,6 +286,7 @@ Before moving, also remove the \"unread\" tag from the current message." (define-key map "-" 'notmuch-search-remove-tag) (define-key map "<" 'beginning-of-buffer) (define-key map ">" 'notmuch-search-goto-last-thread) + (define-key map "=" 'notmuch-search-refresh-view) (define-key map "\M->" 'notmuch-search-goto-last-thread) map) "Keymap for \"notmuch search\" buffers.") @@ -415,6 +416,16 @@ Before moving, also remove the \"unread\" tag from the current message." ) )))) +(defun notmuch-search-refresh-view () + "Refresh the current view. + +Kills the current buffer and runs a new search with the same +query string as the current search." + (interactive) + (let ((query notmuch-search-query-string)) + (kill-this-buffer) + (notmuch-search query))) + (defun notmuch-search-filter (query) "Run \"notmuch search\" to refine the current search results. -- 2.26.2