aboutsummaryrefslogtreecommitdiffhomepage
path: root/emacs/notmuch-hello.el
diff options
context:
space:
mode:
authorGravatar Dmitry Kurochkin <dmitry.kurochkin@gmail.com>2012-01-25 05:10:54 +0400
committerGravatar David Bremner <bremner@debian.org>2012-01-25 08:33:48 -0400
commite6e10b82c98fbb68db45a57d2167af6032934ebc (patch)
treeaba9035d2f631480ff7cc7d5a79a36813b77d189 /emacs/notmuch-hello.el
parentbc267b70b01c79f6bdda52641e9cd7574a151eff (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.el5
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)