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:
Carl Worth 2009-10-30 15:12:49 -07:00
parent 17a0b8a95f
commit 299874ce29

View file

@ -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))