diff options
Diffstat (limited to 'lisp/+elfeed.el')
-rw-r--r-- | lisp/+elfeed.el | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/lisp/+elfeed.el b/lisp/+elfeed.el new file mode 100644 index 0000000..823902b --- /dev/null +++ b/lisp/+elfeed.el | |||
@@ -0,0 +1,24 @@ | |||
1 | ;;; +elfeed.el -*- lexical-binding: t; -*- | ||
2 | |||
3 | ;;; Code: | ||
4 | |||
5 | (require 'elfeed) | ||
6 | |||
7 | (defun +elfeed-scroll-up-command (&optional arg) | ||
8 | "Scroll up or go to next feed item in Elfeed" | ||
9 | (interactive "^P") | ||
10 | (let ((scroll-error-top-bottom nil)) | ||
11 | (condition-case-unless-debug nil | ||
12 | (scroll-up-command arg) | ||
13 | (error (elfeed-show-next))))) | ||
14 | |||
15 | (defun +elfeed-scroll-down-command (&optional arg) | ||
16 | "Scroll up or go to next feed item in Elfeed" | ||
17 | (interactive "^P") | ||
18 | (let ((scroll-error-top-bottom nil)) | ||
19 | (condition-case-unless-debug nil | ||
20 | (scroll-down-command arg) | ||
21 | (error (elfeed-show-prev))))) | ||
22 | |||
23 | (provide '+elfeed) | ||
24 | ;;; +elfeed.el ends here | ||