From 95865596df6526b50db0f50197f1f7a5e0cbe9db Mon Sep 17 00:00:00 2001 From: Carl Worth Date: Fri, 30 Oct 2009 15:17:27 -0700 Subject: [PATCH] notmuch.el: Rename from notmuch-mode.el to notmuch.el Also add the copyright and licensing blurb. --- notmuch-mode.el | 16 ---------------- notmuch.el | 35 +++++++++++++++++++++++++++++++++++ 2 files changed, 35 insertions(+), 16 deletions(-) delete mode 100644 notmuch-mode.el create mode 100644 notmuch.el diff --git a/notmuch-mode.el b/notmuch-mode.el deleted file mode 100644 index 450d4565..00000000 --- a/notmuch-mode.el +++ /dev/null @@ -1,16 +0,0 @@ -; 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 () - "Run notmuch to display all mail with tag of 'inbox'" - (interactive) - (require 'compile) - (compilation-start "notmuch search tag:inbox" 'notmuch-search-mode)) 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 . +; +; Authors: Carl Worth + +;;;###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))