branch: elpa/elfeed
commit 91118e8f1c9e20f15231dfa2c01a81c41e2839b6
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
elfeed-search: Add keybindings t/T for elfeed-search-set-entry/feed-title
---
README.md | 2 ++
elfeed-search.el | 6 ++++--
2 files changed, 6 insertions(+), 2 deletions(-)
diff --git a/README.md b/README.md
index b079ff1b32..10e90dbb23 100644
--- a/README.md
+++ b/README.md
@@ -122,6 +122,8 @@ Multiple entries are selected at once by using an active
region.
* <kbd>u</kbd>: mark selected entries as unread
* <kbd>+</kbd>: add a specific tag to selected entries
* <kbd>-</kbd>: remove a specific tag from selected entries
+ * <kbd>t</kbd>: set title of selected entry
+ * <kbd>T</kbd>: set title of selected feed
## Tags
diff --git a/elfeed-search.el b/elfeed-search.el
index 0c3e41986a..fc9a970a70 100644
--- a/elfeed-search.el
+++ b/elfeed-search.el
@@ -162,6 +162,8 @@ When live editing the filter, it is bound to :live.")
"r" #'elfeed-search-untag-all-unread
"n" #'next-line
"p" #'previous-line
+ "t" #'elfeed-search-set-entry-title
+ "T" #'elfeed-search-set-feed-title
"+" #'elfeed-search-tag-all
"-" #'elfeed-search-untag-all
"<" #'elfeed-search-first-entry
@@ -971,7 +973,7 @@ the browser defined by
`browse-url-secondary-browser-function'."
(defun elfeed-search-set-entry-title (title)
"Manually set TITLE for the entry under point.
Sets the :title key of the entry's metadata. See `elfeed-meta'."
- (interactive "sTitle: "elfeed-search-mode)
+ (interactive "sEntry title: " elfeed-search-mode)
(let ((entry (elfeed-search-selected :ignore-region)))
(unless entry
(error "No entry selected!"))
@@ -981,7 +983,7 @@ Sets the :title key of the entry's metadata. See
`elfeed-meta'."
(defun elfeed-search-set-feed-title (title)
"Manually set TITLE for the feed belonging to the entry under point.
Sets the :title key of the feed's metadata. See `elfeed-meta'."
- (interactive "sTitle: " elfeed-search-mode)
+ (interactive "sFeed title: " elfeed-search-mode)
(let ((entry (elfeed-search-selected :ignore-region)))
(unless entry
(error "No entry selected!"))
