From f1f7e71e0347672e0658362c513e49c05b0f4161 Mon Sep 17 00:00:00 2001 From: Carl Worth Date: Mon, 26 Apr 2010 22:37:11 -0700 Subject: emacs: Add a notmuch-saved-searches function. We use this function to abstract away the common 3-step process for looking for a value for the saved-searches variable: 1. Look at the notmuch-saved-searches variable itself 2. Look at the notmuch-folders vaiable 3. Use a default value We were already using this logic (open-coded) in notmuch-hello, but notmuch.el was accessing notmuch-folders directly for the clever name selection of search buffers. --- emacs/notmuch.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'emacs/notmuch.el') diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 4894012a..469d5fbd 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -665,7 +665,7 @@ characters as well as `_.+-'. (let* ((folder (rassoc-if (lambda (key) (string-match (concat "^" (regexp-quote key)) query)) - notmuch-folders)) + (notmuch-saved-searches))) (folder-name (car folder)) (folder-query (cdr folder))) (cond ((and folder (equal folder-query query)) -- cgit v1.2.3