diff options
| author | jao <jao@gnu.org> | 2022-05-06 00:42:45 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-05-06 00:42:45 +0100 |
| commit | 7be8765df1efdb3276915cedafd82bb059bd4de4 (patch) | |
| tree | d293fc1dfd3a21b25b02bd5b9c763599a7d70bfd /lib | |
| parent | 2fa391e20929f2de4535a496d5487231ab4fd27e (diff) | |
| download | elibs-7be8765df1efdb3276915cedafd82bb059bd4de4.tar.gz elibs-7be8765df1efdb3276915cedafd82bb059bd4de4.tar.bz2 | |
email nits
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/net/jao-notmuch-gnus.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/net/jao-notmuch-gnus.el b/lib/net/jao-notmuch-gnus.el index c64b9f0..e18c5a1 100644 --- a/lib/net/jao-notmuch-gnus.el +++ b/lib/net/jao-notmuch-gnus.el @@ -96,8 +96,9 @@ (notmuch-tag (concat "id:" id) (mapcar (lambda (x) (concat "+" x)) to-tags))))) -(add-hook 'gnus-summary-article-move-hook #'jao-notmuch-gnus-tag-on-move) -(add-hook 'gnus-summary-article-expire-hook #'jao-notmuch-gnus-tag-on-move) +(defun jao-notmuch-gnus-auto-tag () + (add-hook 'gnus-summary-article-move-hook #'jao-notmuch-gnus-tag-on-move) + (add-hook 'gnus-summary-article-expire-hook #'jao-notmuch-gnus-tag-on-move)) ;;;; Displaying search results in Gnus @@ -112,7 +113,7 @@ "Directory where leafnode stores its messages as seen by notmuch.") (defun jao-notmuch-gnus-file-to-group (file &optional maildir newsdir) - "Calculate the Gnus group name from the given file name. + "Compute the Gnus group name from the given file name. Example: IN: /home/jao/var/mail/jao/foo/cur/1259184569.M4818P3384.localhost,W=6921:2,S |