Move RSS configuration to module
This commit is contained in:
30
+rss.el
Normal file
30
+rss.el
Normal file
@@ -0,0 +1,30 @@
|
||||
;;; +rss.el -*- lexical-binding: t; -*-
|
||||
;; Elfeed configuration
|
||||
;;
|
||||
;; Synchronize elfeed with Miniflux
|
||||
(setq elfeed-use-curl t
|
||||
elfeed-protocol-feeds (list
|
||||
(list "fever+https://coolneng@rss.coolneng.duckdns.org"
|
||||
:api-url "https://rss.coolneng.duckdns.org/fever/"
|
||||
:password (auth-source-pass-get 'secret "api/miniflux")))
|
||||
elfeed-sort-order 'ascending
|
||||
elfeed-search-filter "@all +unread"
|
||||
elfeed-goodies/tag-column-width 0)
|
||||
(elfeed-protocol-enable)
|
||||
;; Update RSS feeds on startup
|
||||
(add-hook! 'elfeed-search-mode-hook 'elfeed-update)
|
||||
;; Use different font and show article in fullscreen
|
||||
(setq elfeed-show-entry-switch #'switch-to-buffer)
|
||||
(defadvice! +rss-elfeed-wrap-h-nicer ()
|
||||
"Enhances an elfeed entry's readability by wrapping it to a width of
|
||||
`fill-column' and centering it with `visual-fill-column-mode'."
|
||||
:override #'+rss-elfeed-wrap-h
|
||||
(setq-local truncate-lines nil
|
||||
shr-width 160
|
||||
visual-fill-column-center-text t
|
||||
default-text-properties '(line-height 1.1))
|
||||
(let ((inhibit-read-only t)
|
||||
(inhibit-modification-hooks t))
|
||||
(visual-fill-column-mode)
|
||||
(setq-local shr-current-font '(:family "Lato" :height 1.1))
|
||||
(set-buffer-modified-p nil)))
|
||||
Reference in New Issue
Block a user