blob: 65ac5d0ae957982dc8d52c7137242d85f5507837 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
(require 'fcuny-vars)
(use-package elfeed
:ensure t
:pretty-hydra
((:title "elfeed" :color amaranth :quit-key "q")
("Search"
(("c" elfeed-db-compact "compact db")
("g" elfeed-search-update--force "refresh")
("G" elfeed-search-fetch "update")
("y" elfeed-search-yank "copy URL")
("+" elfeed-search-tag-all "tag all")
("-" elfeed-search-untag-all "untag all"))
"Filter"
(("s" elfeed-search-live-filter "live filter")
("S" elfeed-search-set-filter "set filter")
("*" (elfeed-search-set-filter "@6-months-ago +star") "starred")
("A" (elfeed-search-set-filter "@6-months-ago" "all"))
("T" (elfeed-search-set-filter "@1-day-ago" "today")))
"Article"
(("b" elfeed-search-browse-url "browse")
("n" next-line "next")
("p" previous-line "previous")
("u" elfeed-search-tag-all-unread "mark unread")
("r" elfeed-search-untag-all-unread "mark read")
("RET" elfeed-search-show-entry "show"))))
:bind (("C-x w" . elfeed)
:map elfeed-search-mode-map
("?" . elfeed-hydra/body)
:map elfeed-show-mode-map
("o" . ace-link)
("q" . delete-window))
:config (push elfeed-db-directory recentf-exclude))
(use-package elfeed-org
:ensure t
:after (elfeed)
:config
(elfeed-org)
:custom
(rmh-elfeed-org-files (list (concat fcuny/path-emacs-etc "/elfeed.org")))
(elfeed-search-filter "@1-month-ago +unread "))
(provide 'fcuny-elfeed)
|
