From: Austin Clements <amdragon@MIT.EDU>
Date: Tue, 3 Sep 2013 21:45:19 +0000 (-0400)
Subject: emacs: Bind "s" to notmuch-search in hello-mode
X-Git-Tag: 0.17_rc1~137
X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=8e10f9179880c68dec551ca3054fb1eac34c9708

emacs: Bind "s" to notmuch-search in hello-mode

Since there is now no difference between notmuch-hello-search and
notmuch-search when called interactively, bind "s" to notmuch-search
in notmuch-hello-mode-map.  Now all modes bind "s" this way.
---

diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el
index 24ac1c6b..94cc4b53 100644
--- a/emacs/notmuch-hello.el
+++ b/emacs/notmuch-hello.el
@@ -263,7 +263,6 @@ afterwards.")
     search))
 
 (defun notmuch-hello-search (&optional search)
-  (interactive)
   (unless (null search)
     (setq search (notmuch-hello-trim search))
     (let ((history-delete-duplicates t))
@@ -533,7 +532,7 @@ Such a list can be computed with `notmuch-hello-query-counts'."
     (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-hello-search)
+    (define-key map "s" 'notmuch-search)
     map)
   "Keymap for \"notmuch hello\" buffers.")
 (fset 'notmuch-hello-mode-map notmuch-hello-mode-map)