diff --git a/oni-elfeed.el b/oni-elfeed.el index 734f599..bffaa18 100644 --- a/oni-elfeed.el +++ b/oni-elfeed.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse ;; Keywords: local -;; Version: 2023.0108.120326 +;; Version: 2023.0331.141153 ;; Package-Requires: (elfeed olivetti) ;; This program is free software; you can redistribute it and/or modify @@ -103,6 +103,15 @@ (seq "1920" (minimal-match (zero-or-more whitespace)) nonl (minimal-match (zero-or-more whitespace)) "1080")))) :remove 'unread)) +;;; 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") + ":")))) + (add-hook 'elfeed-show-mode-hook #'oni-elfeed-enable-olivetti-mode) (provide 'oni-elfeed)