diff options
| author | Case Duckworth | 2021-12-13 10:29:50 -0600 |
|---|---|---|
| committer | Case Duckworth | 2021-12-13 10:29:50 -0600 |
| commit | b11adad984e8160e366d7e154d12c378a9545b9a (patch) | |
| tree | 72c23feb56d4d05107ac8285537429786efcda0d /lisp/+elfeed.el | |
| parent | Mostley add +key.el (but of course other stuff) (diff) | |
| download | emacs-b11adad984e8160e366d7e154d12c378a9545b9a.tar.gz emacs-b11adad984e8160e366d7e154d12c378a9545b9a.zip | |
Lots of changes, most interestingly browse-url stuff
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 | ||