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

feat: save the database on elfeed-summary quit

Browse source
This commit is contained in:
Pavel Korytov 2022-03-30 14:43:34 +03:00
parent 7b58bb1beb
commit 2f351bed59
1 changed files with 8 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
elfeed-summary.el
View file

@ -628,9 +628,7 @@ The return value is a list of alists of the following elements:
(set-keymap-parent map magit-section-mode-map)
(define-key map (kbd "RET") #'elfeed-summary--action)
(define-key map (kbd "M-RET") #'elfeed-summary--action-show-read)
(define-key map (kbd "q") (lambda ()
(interactive)
(quit-window t)))
(define-key map (kbd "q") #'elfeed-summary-quit-window)
(define-key map (kbd "r") #'elfeed-summary--refresh)
(define-key map (kbd "R") #'elfeed-summary-update)
(define-key map (kbd "u") #'elfeed-summary-toggle-only-unread)
@ -644,9 +642,7 @@ The return value is a list of alists of the following elements:
(kbd "RET") #'elfeed-summary--action
"M-RET" #'elfeed-summary--action-show-read
"U" #'elfeed-summary--action-mark-read
"q" (lambda ()
(interactive)
(quit-window t))))
"q" #'elfeed-summary-quit-window))
map)
"A keymap for `elfeed-summary-mode-map'.")
@ -1098,6 +1094,12 @@ search buffer."
(elfeed-summary--refresh))
(elfeed-db-save)))
(defun elfeed-summary-quit-window ()
"Save the database, then `quit-window'."
(interactive)
(elfeed-db-save)
(quit-window t))
(defun elfeed-summary--setup ()
"Setup elfeed summary."
(advice-add #'elfeed-search-quit-window :override #'elfeed-summary--elfeed-search-quit))