debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-21 18:38:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

notmuch.el: Add an '=' key to refresh the current view.

Browse source 
This will allow for updates when a separate process (say, a notmuch-
show buffer), has archived messages.
This commit is contained in:
Carl Worth 2009-11-03 11:47:48 -08:00
parent e96e34c3f1
commit 2d507c9c6d
1 changed files with 11 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
notmuch.el
View file

@ -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.