diff options
| author | jao <jao@gnu.org> | 2025-09-20 19:03:07 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-09-20 19:03:07 +0100 |
| commit | abda6921e5a013051fc9fcd5de8d682be1a4d44d (patch) | |
| tree | 4779d6a07912e62fb89a9d6a5a97d61786c22d8d /lib/net/jao-notmuch.el | |
| parent | 889b21138993a67a286f380bbc6d4ca56e475b42 (diff) | |
| download | elibs-abda6921e5a013051fc9fcd5de8d682be1a4d44d.tar.gz elibs-abda6921e5a013051fc9fcd5de8d682be1a4d44d.tar.bz2 | |
jao-r2e: new package to handle rss2email subscriptions
Diffstat (limited to 'lib/net/jao-notmuch.el')
| -rw-r--r-- | lib/net/jao-notmuch.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el index aef9757..75ee027 100644 --- a/lib/net/jao-notmuch.el +++ b/lib/net/jao-notmuch.el @@ -1,6 +1,6 @@ ;;; jao-notmuch.el --- Extensions for notmuch -*- lexical-binding: t; -*- -;; Copyright (C) 2021, 2022, 2023, 2024 jao +;; Copyright (C) 2021, 2022, 2023, 2024, 2025 jao ;; Author: jao <mail@jao.io> ;; Keywords: mail @@ -339,6 +339,12 @@ (let ((tags (plist-get (notmuch-tree-get-message-properties) :orig-tags))) (jao-notmuch-tree--tag tags nil))) +(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-mua-reply-not-inherited '("attachment" "sent" "new" "bigml" "jao" "trove")) |