diff options
author | Dmitry Kurochkin <dmitry.kurochkin@gmail.com> | 2012-01-25 05:10:54 +0400 |
---|---|---|
committer | David Bremner <bremner@debian.org> | 2012-01-25 08:33:48 -0400 |
commit | e6e10b82c98fbb68db45a57d2167af6032934ebc (patch) | |
tree | aba9035d2f631480ff7cc7d5a79a36813b77d189 /emacs/notmuch-hello.el | |
parent | bc267b70b01c79f6bdda52641e9cd7574a151eff (diff) |
emacs: bind "s" to `notmuch-hello-search' in notmuch-hello buffer
`notmuch-hello-search' uses `notmuch-search' function but refreshes
notmuch-hello buffer when the search buffer is closed.
Diffstat (limited to 'emacs/notmuch-hello.el')
-rw-r--r-- | emacs/notmuch-hello.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 6970bc34..ab65e369 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -172,7 +172,8 @@ International Bureau of Weights and Measures." (match-string 1 search) search)) -(defun notmuch-hello-search (search) +(defun notmuch-hello-search (&optional search) + (interactive) (unless (null search) (setq search (notmuch-hello-trim search)) (let ((history-delete-duplicates t)) @@ -343,7 +344,7 @@ should be. Returns a cons cell `(tags-per-line width)'." (define-key map "G" 'notmuch-hello-poll-and-update) (define-key map (kbd "<C-tab>") 'widget-backward) (define-key map "m" 'notmuch-mua-new-mail) - (define-key map "s" 'notmuch-search) + (define-key map "s" 'notmuch-hello-search) map) "Keymap for \"notmuch hello\" buffers.") (fset 'notmuch-hello-mode-map notmuch-hello-mode-map) |