aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--oni-elfeed.el19
1 files changed, 11 insertions, 8 deletions
diff --git a/oni-elfeed.el b/oni-elfeed.el
index a5ba02d..8f85fb2 100644
--- a/oni-elfeed.el
+++ b/oni-elfeed.el
@@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local
-;; Version: 2023.0401.234314
+;; Version: 2023.0411.200412
;; Package-Requires: (elfeed olivetti)
;; This program is free software; you can redistribute it and/or modify
@@ -106,13 +106,16 @@
;;; Mark any post from Planet Emacslife read if I also follow the originating
;;; blog. This way I won't have so many duplicates.
-(add-hook 'elfeed-new-entry-hook
- (elfeed-make-tagger :feed-url (rx "planet.emacslife.com")
- :entry-title `(not ,(rx bos (or "Irreal"
- "Sacha Chua"
- "Andrea")
- ":"))
- :remove 'unread))
+(defvar oni-elfeed-duplicate-tagger
+ (elfeed-make-tagger :feed-url (rx "planet.emacslife.com")
+ :entry-title (rx bos (or "Irreal"
+ (seq "Sacha" whitespace "Chua")
+ "Andrea")
+ ":")
+ :remove 'unread)
+ "Tagger for elfeed that marks certain posts as read for Emacslife.")
+
+(add-hook 'elfeed-new-entry-hook oni-elfeed-duplicate-tagger)
(add-hook 'elfeed-show-mode-hook #'oni-elfeed-enable-olivetti-mode)