diff options
Diffstat (limited to 'notmuch.el')
-rw-r--r-- | notmuch.el | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/notmuch.el b/notmuch.el new file mode 100644 index 00000000..05179150 --- /dev/null +++ b/notmuch.el @@ -0,0 +1,35 @@ +; notmuch.el --- run notmuch within emacs +; +; Copyright © Carl Worth +; +; This file is part of Notmuch. +; +; Notmuch is free software: you can redistribute it and/or modify it +; under the terms of the GNU General Public License as published by +; the Free Software Foundation, either version 3 of the License, or +; (at your option) any later version. +; +; Notmuch is distributed in the hope that it will be useful, but +; WITHOUT ANY WARRANTY; without even the implied warranty of +; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +; General Public License for more details. +; +; You should have received a copy of the GNU General Public License +; along with Notmuch. If not, see <http://www.gnu.org/licenses/>. +; +; Authors: Carl Worth <cworth@cworth.org> + +;;;###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 () + "Run notmuch to display all mail with tag of 'inbox'" + (interactive) + (require 'compile) + (compilation-start "notmuch search tag:inbox" 'notmuch-search-mode)) |