From b5832a0dbb391c380f54af414019d6b8435758d9 Mon Sep 17 00:00:00 2001 From: Daniel Nagy Date: Tue, 6 Jul 2021 17:37:27 +0200 Subject: [PATCH 1/2] Assign `list-buffers-directory` to the search filter This displays the search filter for elfeed-search buffers in `M-x list-buffers` instead of showing an empty path column. --- elfeed-search.el | 1 + 1 file changed, 1 insertion(+) diff --git a/elfeed-search.el b/elfeed-search.el index d1d9b57..0a3b7d5 100644 --- a/elfeed-search.el +++ b/elfeed-search.el @@ -652,6 +652,7 @@ expression, matching against entry link, title, and feed title." (with-current-buffer (elfeed-search-buffer) (setf elfeed-search-filter (or new-filter (default-value 'elfeed-search-filter))) + (setq list-buffers-directory new-filter) (elfeed-search-update :force))) (defun elfeed-search--update-list () From 636f0fa18c2b3244f0eee1b9aebafeb0f6fff2ec Mon Sep 17 00:00:00 2001 From: Daniel Nagy Date: Tue, 6 Jul 2021 19:24:18 +0200 Subject: [PATCH 2/2] Assign `list-buffers-directory` to entry title For elfeed-entry buffers, this displays the entry title in `M-x list-buffers` instead of showing an empty path column. --- elfeed-show.el | 1 + 1 file changed, 1 insertion(+) diff --git a/elfeed-show.el b/elfeed-show.el index 4915cae..c5ea4a5 100644 --- a/elfeed-show.el +++ b/elfeed-show.el @@ -158,6 +158,7 @@ Called without arguments." (feed-title (elfeed-feed-title feed)) (base (and feed (elfeed-compute-base (elfeed-feed-url feed))))) (erase-buffer) + (setq list-buffers-directory (elfeed-entry-title elfeed-show-entry)) (insert (format (propertize "Title: %s\n" 'face 'message-header-name) (propertize title 'face 'message-header-subject))) (when elfeed-show-entry-author