mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-25 04:18:08 +01:00
notmuch-mode: Add an actualy notmuch-search-mode as well
Doesn't really do anything so far other than mark the buffer read- only. This does have the benefit of giving us our own name rather than "Compilation" for the mode.
This commit is contained in:
parent
17a0b8a95f
commit
299874ce29
1 changed files with 10 additions and 1 deletions
|
@ -1,7 +1,16 @@
|
||||||
; A mode for running notmuch within emacs
|
; A mode for running notmuch within emacs
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun notmuch-search-mode ()
|
||||||
|
"Major mode for handling the output of notmuch search"
|
||||||
|
(interactive)
|
||||||
|
(kill-all-local-variables)
|
||||||
|
(setq major-mode 'notmuch-search-mode
|
||||||
|
mode-name "notmuch-search")
|
||||||
|
(setq buffer-read-only t))
|
||||||
|
|
||||||
(defun notmuch ()
|
(defun notmuch ()
|
||||||
"Run notmuch to display all mail with tag of 'inbox'"
|
"Run notmuch to display all mail with tag of 'inbox'"
|
||||||
(interactive)
|
(interactive)
|
||||||
(require 'compile)
|
(require 'compile)
|
||||||
(compilation-start "notmuch search tag:inbox"))
|
(compilation-start "notmuch search tag:inbox" 'notmuch-search-mode))
|
||||||
|
|
Loading…
Reference in a new issue