From 5341508fd475a8983783643d854b9827a14641d1 Mon Sep 17 00:00:00 2001 From: Chris Cochrun Date: Sun, 17 Jul 2022 06:34:11 -0500 Subject: [PATCH] adding a way to view elfeed articles in eww --- README.org | 12 +++++++++++- init.el | 12 +++++++++++- 2 files changed, 22 insertions(+), 2 deletions(-) diff --git a/README.org b/README.org index 8ab831d5..1b76c8a7 100644 --- a/README.org +++ b/README.org @@ -2854,6 +2854,13 @@ interfere with the default `bongo-playlist-buffer'." (setq shr-use-colors nil) + (defun chris/elfeed-eww-browse () + (interactive) + (let* ((entry (elfeed-search-selected :ignore-region)) + (link (elfeed-entry-link entry))) + (message link) + (eww link))) + :general (chris/leader-keys :states 'normal @@ -2862,7 +2869,10 @@ interfere with the default `bongo-playlist-buffer'." (general-def 'normal elfeed-search-mode-map "v" 'chris/elfeed-bongo-insert-item - "h" 'chris/elfeed-bongo-switch-to-playlist)) + "h" 'chris/elfeed-bongo-switch-to-playlist + "b" 'chris/elfeed-eww-browse) + (general-def 'normal elfeed-show-mode-map + "b" 'eww)) #+end_src #+begin_src emacs-lisp diff --git a/init.el b/init.el index c60a26f5..cf02535e 100644 --- a/init.el +++ b/init.el @@ -2029,6 +2029,13 @@ interfere with the default `bongo-playlist-buffer'." (setq shr-use-colors nil) + (defun chris/elfeed-eww-browse () + (interactive) + (let* ((entry (elfeed-search-selected :ignore-region)) + (link (elfeed-entry-link entry))) + (message link) + (eww link))) + :general (chris/leader-keys :states 'normal @@ -2037,7 +2044,10 @@ interfere with the default `bongo-playlist-buffer'." (general-def 'normal elfeed-search-mode-map "v" 'chris/elfeed-bongo-insert-item - "h" 'chris/elfeed-bongo-switch-to-playlist)) + "h" 'chris/elfeed-bongo-switch-to-playlist + "b" 'chris/elfeed-eww-browse) + (general-def 'normal elfeed-show-mode-map + "b" 'eww)) (use-package elfeed-org :after elfeed