debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-12-23 01:44:52 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source 
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.
This commit is contained in:
Austin Clements 2013-09-03 17:45:19 -04:00 committed by David Bremner
parent da88f4b6d5
commit 8e10f91798
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
emacs/notmuch-hello.el
View file

@ -263,7 +263,6 @@ afterwards.")
search)) search))
(defun notmuch-hello-search (&optional search) (defun notmuch-hello-search (&optional search)
(interactive)
(unless (null search) (unless (null search)
(setq search (notmuch-hello-trim search)) (setq search (notmuch-hello-trim search))
(let ((history-delete-duplicates t)) (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 "G" 'notmuch-hello-poll-and-update)
(define-key map (kbd "<C-tab>") 'widget-backward) (define-key map (kbd "<C-tab>") 'widget-backward)
(define-key map "m" 'notmuch-mua-new-mail) (define-key map "m" 'notmuch-mua-new-mail)
(define-key map "s" 'notmuch-hello-search) (define-key map "s" 'notmuch-search)
map) map)
"Keymap for \"notmuch hello\" buffers.") "Keymap for \"notmuch hello\" buffers.")
(fset 'notmuch-hello-mode-map notmuch-hello-mode-map) (fset 'notmuch-hello-mode-map notmuch-hello-mode-map)