82 lines
2.9 KiB
Org Mode
82 lines
2.9 KiB
Org Mode
|
#+title: Newsticker Config
|
||
|
|
#+author: Evie Litherland-Smith
|
||
|
|
#+email: evie@xenia.me.uk
|
||
|
|
#+filetags: :emacs:config:org:
|
||
|
|
#+property: header-args:emacs-lisp :tangle yes :mkdirp yes :results output silent
|
||
|
|
|
||
|
|
#+begin_src emacs-lisp
|
||
|
|
(use-package newsticker
|
||
|
|
:ensure t
|
||
|
|
:custom
|
||
|
|
(newsticker-url-list-defaults '(("Emacs Wiki" "https://www.emacswiki.org/emacs?action=rss" nil 3600)
|
||
|
|
("LWN (Linux Weekly News)" "https://lwn.net/headlines/rss")
|
||
|
|
("Quote of the day" "https://feeds.feedburner.com/quotationspage/qotd" "07:00" 86400)
|
||
|
|
("The Register" "https://www.theregister.co.uk/headlines.rss")
|
||
|
|
("slashdot" "http://rss.slashdot.org/Slashdot/slashdot" nil 3600)
|
||
|
|
("Wired News" "https://www.wired.com/feed/rss")))
|
||
|
|
(newsticker-url-list '(("Proton Blog" "https://proton.me/blog/feed" nil nil nil)
|
||
|
|
("The Friday Chillout" "https://podcasts.watchnebula.com/chilloutpod" nil nil nil)
|
||
|
|
("SystemCrafters News" "https://systemcrafters.net/rss/news.xml" nil nil nil)
|
||
|
|
("Atlas NYXT News" "https://nyxt.atlas.engineer/feed" nil nil nil)
|
||
|
|
("LiberaChat" "https://libera.chat/atom.xml" nil nil nil)
|
||
|
|
("This week in Rust" "https://this-week-in-rust.org/rss.xml" nil nil nil)
|
||
|
|
("Forgejo Feed" "https://forgejo.org/rss.xml" nil nil nil))))
|
||
|
|
#+end_src
|
||
|
|
|
||
|
|
#+RESULTS:
|
||
|
|
|
||
|
|
* Elfeed
|
||
|
|
#+begin_src emacs-lisp
|
||
|
|
(use-package elfeed
|
||
|
|
:bind (("C-c f f" . elfeed)
|
||
|
|
("C-c f u" . elfeed-update))
|
||
|
|
:hook (elfeed-search-mode . elfeed-update)
|
||
|
|
:custom
|
||
|
|
(elfeed-search-filter "@2-weeks-ago +unread")
|
||
|
|
:config
|
||
|
|
(require 'elfeed-org)
|
||
|
|
(require 'elfeed-tube)
|
||
|
|
(require 'elfeed-tube-mpv))
|
||
|
|
#+end_src
|
||
|
|
|
||
|
|
** elfeed-org
|
||
|
|
|
||
|
|
Manage elfeed subscriptions in an org-mode file instead of elisp.
|
||
|
|
|
||
|
|
#+begin_src emacs-lisp
|
||
|
|
(use-package elfeed-org
|
||
|
|
:ensure t
|
||
|
|
:after (elfeed org)
|
||
|
|
:custom
|
||
|
|
(rmh-elfeed-org-files (list (expand-file-name "feeds.org" org-directory)))
|
||
|
|
:config
|
||
|
|
(elfeed-org))
|
||
|
|
#+end_src
|
||
|
|
|
||
|
|
** elfeed-tube
|
||
|
|
|
||
|
|
Use elfeed for YouTube subscriptions, including getting video transcripts.
|
||
|
|
|
||
|
|
#+begin_src emacs-lisp
|
||
|
|
(use-package elfeed-tube
|
||
|
|
:ensure t
|
||
|
|
:after elfeed
|
||
|
|
:config
|
||
|
|
(setq elfeed-tube-auto-save-p nil)
|
||
|
|
(setq elfeed-tube-auto-fetch-p t)
|
||
|
|
(elfeed-tube-setup)
|
||
|
|
:bind ( :map elfeed-show-mode-map
|
||
|
|
("F" . elfeed-tube-fetch)
|
||
|
|
([remap save-buffer] . elfeed-tube-save)
|
||
|
|
:map elfeed-search-mode-map
|
||
|
|
("F" . elfeed-tube-fetch)
|
||
|
|
([remap save-buffer] . elfeed-tube-save)))
|
||
|
|
(use-package elfeed-tube-mpv
|
||
|
|
:ensure t
|
||
|
|
:after elfeed-tube
|
||
|
|
:init (require 'mpv)
|
||
|
|
:bind ( :map elfeed-show-mode-map
|
||
|
|
("C-c C-f" . elfeed-tube-mpv-follow-mode)
|
||
|
|
("C-c C-w" . elfeed-tube-mpv-where)))
|
||
|
|
#+end_src
|