elfeed: Add elfeed-switch-back and bind it to "s-n"

.emacs.d/init.el

@@ -285,6 +285,7 @@
 ;;; News
 (nconc package-selected-packages '(elfeed))
 (with-eval-after-load 'elfeed (require 'init-elfeed))
+(autoload 'elfeed-switch-back "elfeed")
 
 ;;; Org-mode
 (nconc package-selected-packages '(org-plus-contrib org-bullets)) ; org-plus contains latest Org mode.

.emacs.d/lisp/init-elfeed.el

@@ -35,6 +35,14 @@ See `elfeed-play-with-mpv'."
 
 (define-key elfeed-search-mode-map "v" #'elfeed-play-in-mpv)
 
+(defun elfeed-switch-back ()
+  "Back to the last elfeed buffer, entry or search."
+  (interactive)
+  (let ((buffer (get-buffer "*elfeed-entry*")))
+    (if buffer
+        (switch-to-buffer buffer)
+      (elfeed))))
+
 (load "~/personal/news/elfeed.el" t)
 
 (provide 'init-elfeed)

.emacs.d/lisp/init-exwm.el

@@ -103,6 +103,7 @@
   (exwm-input-set-key (kbd "s-p") #'helm-pass))
 (when (delq nil (mapcar (lambda (path) (string-match "/mu4e/\\|/mu4e$" path)) load-path))
   (exwm-input-set-key (kbd "s-m") #'mu4e-headers))
+(exwm-input-set-key (kbd "s-n") #'elfeed-switch-back) ; "n" for "news"
 (exwm-input-set-key (kbd "s-e") #'eww-switch-back)
 (exwm-input-set-key (kbd "s-E") #'eww)