diff options
| author | Carl Worth <cworth@cworth.org> | 2010-04-21 17:04:36 -0700 |
|---|---|---|
| committer | Carl Worth <cworth@cworth.org> | 2010-04-21 17:04:36 -0700 |
| commit | 38c595738f229eda659853df34dee05cf618556c (patch) | |
| tree | 9a778ccb092df8747a60ea2baa932252dd4a4c8b /emacs/notmuch.el | |
| parent | 3bf27d6c5867a14c58735adba36a3a9ead06a8ff (diff) | |
emacs: Move definition of notmuch-folders to earlier in the file.
To avoid a warning about a free variable from the emacs compiler.
Diffstat (limited to 'emacs/notmuch.el')
| -rw-r--r-- | emacs/notmuch.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 6eff654..57b7fcf 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -665,6 +665,11 @@ characters as well as `_.+-'. (apply 'notmuch-call-notmuch-process "tag" (append action-split (list notmuch-search-query-string) nil)))) +(defcustom notmuch-folders (quote (("inbox" . "tag:inbox") ("unread" . "tag:unread"))) + "List of searches for the notmuch folder view" + :type '(alist :key-type (string) :value-type (string)) + :group 'notmuch) + (defun notmuch-search-buffer-title (query) "Returns the title for a buffer with notmuch search results." (let* ((folder (rassoc-if (lambda (key) @@ -808,11 +813,6 @@ current search results AND that are tagged with the given tag." (fset 'notmuch-folder-mode-map notmuch-folder-mode-map) -(defcustom notmuch-folders (quote (("inbox" . "tag:inbox") ("unread" . "tag:unread"))) - "List of searches for the notmuch folder view" - :type '(alist :key-type (string) :value-type (string)) - :group 'notmuch) - (defun notmuch-folder-mode () "Major mode for showing notmuch 'folders'. |