diff --git a/modules/app/rss/autoload.el b/modules/app/rss/autoload.el index 2f742348a..a53ceaef4 100644 --- a/modules/app/rss/autoload.el +++ b/modules/app/rss/autoload.el @@ -54,7 +54,14 @@ (forward-line -1) (call-interactively '+rss/open))) - +;;;###autoload +(defun +rss/copy-link () + "Copy current link to clipboard." + (interactive) + (let ((link (elfeed-entry-link elfeed-show-entry))) + (when link + (kill-new link) + (message "Copied %s to clipboard" link)))) ;; ;; Hooks diff --git a/modules/app/rss/config.el b/modules/app/rss/config.el index 4f30c1b9e..7adca8c47 100644 --- a/modules/app/rss/config.el +++ b/modules/app/rss/config.el @@ -58,7 +58,11 @@ easier to scroll through.") (evil-define-key 'normal elfeed-search-mode-map "q" #'elfeed-kill-buffer "r" #'elfeed-search-update--force - (kbd "M-RET") #'elfeed-search-browse-url))) + (kbd "M-RET") #'elfeed-search-browse-url) + (map! (:map elfeed-show-mode-map + :n "gc" nil + :n "gc" #'+rss/copy-link)))) + (use-package! elfeed-org