summaryrefslogtreecommitdiffhomepage
path: root/lib/net
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-05-06 00:42:45 +0100
committerjao <jao@gnu.org>2022-05-06 00:42:45 +0100
commit7be8765df1efdb3276915cedafd82bb059bd4de4 (patch)
treed293fc1dfd3a21b25b02bd5b9c763599a7d70bfd /lib/net
parent2fa391e20929f2de4535a496d5487231ab4fd27e (diff)
downloadelibs-7be8765df1efdb3276915cedafd82bb059bd4de4.tar.gz
elibs-7be8765df1efdb3276915cedafd82bb059bd4de4.tar.bz2
email nits
Diffstat (limited to 'lib/net')
-rw-r--r--lib/net/jao-notmuch-gnus.el7
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