sqrtminusone/elfeed-summary
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/elfeed-summary.git synced 2025-12-11 10:03:03 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: melpa/melpa#7972

Browse source
This commit is contained in:
Pavel Korytov 2022-03-28 12:07:21 +03:00
parent 759ec89969
commit 7b58bb1beb
1 changed files with 17 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
elfeed-summary.el
View file

@ -126,7 +126,7 @@
(const :tag "Misc feeds" :misc)))) (const :tag "Misc feeds" :misc))))
(defgroup elfeed-summary () (defgroup elfeed-summary ()
"Feed summary inteface for elfeed." "Feed summary interface for elfeed."
:group 'elfeed) :group 'elfeed)
(defcustom elfeed-summary-settings (defcustom elfeed-summary-settings
@ -540,7 +540,7 @@ PARAMS is a form as described in `elfeed-summary-settings'."
append (elfeed-summary--get-feeds (cdr param)))) append (elfeed-summary--get-feeds (cdr param))))
(defun elfeed-summary--ensure () (defun elfeed-summary--ensure ()
"Ensure that eleed database is loaded and feeds are set up." "Ensure that elfeed database is loaded and feeds are set up."
(elfeed-db-ensure) (elfeed-db-ensure)
(when (and (not elfeed-feeds) (when (and (not elfeed-feeds)
(fboundp #'rmh-elfeed-org-process) (fboundp #'rmh-elfeed-org-process)
@ -760,8 +760,7 @@ SECTION is an instance of `elfeed-summary-group-section'."
(cond (cond
(elfeed-summary--search-mark-read (elfeed-summary--search-mark-read
(elfeed-summary--mark-read feeds)) (elfeed-summary--mark-read feeds))
(t (progn (t (elfeed)
(elfeed)
(elfeed-search-set-filter (elfeed-search-set-filter
(concat (concat
elfeed-summary-default-filter elfeed-summary-default-filter
@ -774,7 +773,7 @@ SECTION is an instance of `elfeed-summary-group-section'."
"" ""
(elfeed-feed-url feed)))) (elfeed-feed-url feed))))
feeds feeds
" ")))))))) " ")))))))
(defun elfeed-summary--render-feed (data _level) (defun elfeed-summary--render-feed (data _level)
"Render a feed item for the elfeed summary buffer. "Render a feed item for the elfeed summary buffer.
@ -880,7 +879,7 @@ the level of the recursive descent."
TREE is a form such as returned by `elfeed-summary--get-data'. TREE is a form such as returned by `elfeed-summary--get-data'.
MAX-UNREAD and MAX-TOTAL are paramenters for the recursive descent." MAX-UNREAD and MAX-TOTAL are parameters for the recursive descent."
(unless max-unread (unless max-unread
(setq max-unread 0 (setq max-unread 0
max-total 0)) max-total 0))