diff options
| author |  Tom Willemse | 2022-11-22 23:31:17 -0800 |
|---|---|---|
| committer | Tom Willemse | 2022-11-22 23:31:17 -0800 |
| commit | 7f72a0a47e5a68563ff5ddca973fec3c9315abc2 (patch) | |
| tree | 39398e594ab7e719e53f4e24542a75f269d25cfd /oni-elfeed.el | |
| parent | ce285a51d696f9a77d2975b987be0e38e6d52fce (diff) | |
| download | emacs-config-7f72a0a47e5a68563ff5ddca973fec3c9315abc2.tar.gz emacs-config-7f72a0a47e5a68563ff5ddca973fec3c9315abc2.zip | |
[oni-elfeed] Subscribe to specific wallpaper sizes on reddit
Diffstat (limited to 'oni-elfeed.el')
| -rw-r--r-- | oni-elfeed.el | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/oni-elfeed.el b/oni-elfeed.el index ebb8c6b..f4c7b7f 100644 --- a/oni-elfeed.el +++ b/oni-elfeed.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse <tom@ryuslash.org> ;; Keywords: local -;; Version: 2022.0927.235248 +;; Version: 2022.1122.232823 ;; Package-Requires: (elfeed olivetti) ;; This program is free software; you can redistribute it and/or modify @@ -80,7 +80,8 @@ "https://programming-journal.org/feed.xml" "https://unzip.dev/rss/" ("http://lambda-the-ultimate.org/rss.xml" lisp) - "https://planet.emacslife.com/atom.xml")) + "https://planet.emacslife.com/atom.xml" + "https://www.reddit.com/r/wallpapers/new.xml")) (add-hook 'elfeed-new-entry-hook (elfeed-make-tagger :before "2 weeks ago" @@ -92,6 +93,13 @@ :entry-title (rx bos "[$]") :remove 'unread)) +;;; Mark any post not containing my resolutions as read. +(add-hook 'elfeed-new-entry-hook + (elfeed-make-tagger :feed-url (rx "reddit.com/r/wallpapers") + :entry-title `(not ,(rx (or (seq "5120" (minimal-match (zero-or-more whitespace)) nonl (minimal-match (zero-or-more whitespace)) "1440") + (seq "1920" (minimal-match (zero-or-more whitespace)) nonl (minimal-match (zero-or-more whitespace)) "1080")))) + :remove 'unread)) + (add-hook 'elfeed-show-mode-hook #'oni-elfeed-enable-olivetti-mode) (provide 'oni-elfeed) |