diff options
author | 2009-10-30 17:18:19 -0700 | |
---|---|---|
committer | 2009-10-30 17:18:19 -0700 | |
commit | 7e8ba9adf8198acf46f36913853c1af332467afe (patch) | |
tree | 03a095cfb322266eef88414778459d4eaa09453f | |
parent | ea97496081b8ffabce658463a2c6c847cdf02ea8 (diff) |
notmuch.el: Add notmuch-search command as well as notmuch
This allows for entering a query string interactively.
-rw-r--r-- | notmuch.el | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -40,8 +40,13 @@ mode-name "notmuch-search") (setq buffer-read-only t)) +(defun notmuch-search (query) + "Run \"notmuch search\" with the given query string and display results." + (interactive "sNotmuch search:") + (compilation-start (concat "notmuch search " query) 'notmuch-search-mode)) + (defun notmuch () "Run notmuch to display all mail with tag of 'inbox'" (interactive) (require 'compile) - (compilation-start "notmuch search tag:inbox" 'notmuch-search-mode)) + (notmuch-search "tag:inbox")) |