diff options
| author | jao <jao@gnu.org> | 2026-09-07 10:58:37 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2026-09-07 10:58:37 +0100 |
| commit | 45c15fdd38c0b9dde8099813137b2ebdea3ca3bc (patch) | |
| tree | 0fb9d731ca7945d777f6ec33b492ea43217cbedc /lib/net/jao-notmuch.el | |
| parent | 10019bc241f0f9a30fb44371546b0d8f532892ed (diff) | |
| download | elibs-45c15fdd38c0b9dde8099813137b2ebdea3ca3bc.tar.gz elibs-45c15fdd38c0b9dde8099813137b2ebdea3ca3bc.tar.bz2 | |
misc fixes
Diffstat (limited to 'lib/net/jao-notmuch.el')
| -rw-r--r-- | lib/net/jao-notmuch.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el index 40db88d..61233e6 100644 --- a/lib/net/jao-notmuch.el +++ b/lib/net/jao-notmuch.el @@ -346,12 +346,15 @@ (let ((tags (plist-get (notmuch-tree-get-message-properties) :orig-tags))) (jao-notmuch-tree--tag tags nil))) +(defvar jao-notmuch--shared-tags + '("new" "unread" "flagged" "signed" "sent" "attachment" "forwarded" "inbox" + "encrypted" "gmane" "gnus" "feeds" "rss" "mce" "trove" "prog" "emacs")) + (defun jao-notmuch-subtags (tag &rest excl) (let* ((cmd (concat "notmuch search --output=tags tag:" tag)) (ts (split-string (shell-command-to-string cmd)))) (seq-difference ts (append jao-notmuch--shared-tags (cons tag excl))))) - ;;; fcc (defvar jao-notmuch-tags-not-inherited '("attachment" "sent" "new" "trove" "flagged" "drivel" "replied")) |