summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKeith Amidon <keith@nicira.com>2009-11-27 05:30:08 -0800
committerCarl Worth <cworth@cworth.org>2009-11-28 09:35:28 -0800
commit0a7bd1c728390efc5cc000987f6dd42638314328 (patch)
treea13232004edc90ae7dfeaa4fb68fc6d30fd10ad0
parent92c4dcc641e9dfb5f65026ebae5cedc8eb1d9e21 (diff)
Adjust autoload comments
The previous location of autoload comments didn't seem to correspond with the functions most likely to be the entry points for using notmuch. This change adjusts them to match those likely entry points.
-rw-r--r--notmuch.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/notmuch.el b/notmuch.el
index 04c0fe7..96c5d96 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -809,8 +809,6 @@ view, (remove the \"inbox\" tag from each), with
mode-name "notmuch-show")
(setq buffer-read-only t))
-;;;###autoload
-
(defgroup notmuch nil
"Notmuch mail reader for Emacs."
:group 'mail)
@@ -1160,6 +1158,7 @@ characters as well as `_.+-'.
(apply 'notmuch-call-notmuch-process "tag"
(append action-split (list notmuch-search-query-string) nil))))
+;;;###autoload
(defun notmuch-search (query &optional oldest-first)
"Run \"notmuch search\" with the given query string and display results."
(interactive "sNotmuch search: ")
@@ -1239,6 +1238,8 @@ current search results AND that are tagged with the given tag."
(list (notmuch-select-tag-with-completion "Filter by tag: ")))
(notmuch-search (concat notmuch-search-query-string " and tag:" tag) notmuch-search-oldest-first))
+
+;;;###autoload
(defun notmuch ()
"Run notmuch to display all mail with tag of 'inbox'"
(interactive)
@@ -1314,6 +1315,7 @@ results for the search terms in that line.
(if search
(notmuch-search (cdr search) notmuch-search-oldest-first))))
+;;;###autoload
(defun notmuch-folder ()
"Show the notmuch folder view and update the displayed counts."
(interactive)