diff options
Diffstat (limited to 'notmuch.org')
| -rw-r--r-- | notmuch.org | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/notmuch.org b/notmuch.org index 728851d..9a7772f 100644 --- a/notmuch.org +++ b/notmuch.org @@ -88,7 +88,9 @@ ,(jao-notmuch--qn "emacs" "devel" "ed" '("tag:emacs-devel")) ,(jao-notmuch--qn "emacs" "bugs" "eb" '("tag:emacs-bugs")) ,(jao-notmuch--qn "emacs" "diffs" "ec" '("tag:emacs-diffs")) - ,@(jao-notmuch--mboxes-search "feeds" "emacs") + ,(jao-notmuch--qn "feeds" "lobsters" "fl" '("tag:lobsters")) + ,(jao-notmuch--qn "feeds" "prog" "fp" '("tag:prog" "not tag:lobsters")) + ,@(jao-notmuch--mboxes-search "feeds" "emacs" "prog") ,(jao-notmuch--q "bml" "today" "tb" '("tag:bigml" "date:1d..") t) ,(jao-notmuch--q "jao" "today" "tj" '("tag:jao" "date:1d.." @@ -102,7 +104,8 @@ (defun jao-notmuch-widen-searches (searches) (mapcar (lambda (s) (let ((q (plist-get s :query))) - (plist-put s :query (string-replace jao-notmuch--newa "" q)))) + (plist-put (copy-sequence s) + :query (string-replace jao-notmuch--newa "" q)))) searches)) (defvar jao-notmuch-widened-searches @@ -229,7 +232,7 @@ :config (setq jao-notmuch-mailboxes (jao-mailbox-folders))) #+end_src -* tree view +* views #+begin_src emacs-lisp (use-package notmuch-tree :config |