From 447863cedd6685ff585946a779398c02d63ae0d5 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 15 Oct 2016 21:24:56 -0400 Subject: Add km/elfeed-avy-goto-subword-1 command --- lisp/km-avy.el | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'lisp') diff --git a/lisp/km-avy.el b/lisp/km-avy.el index ba8e058..bfed3e1 100644 --- a/lisp/km-avy.el +++ b/lisp/km-avy.el @@ -66,5 +66,13 @@ (call-interactively #'avy-goto-subword-1)) (gnus-summary-scroll-up 0)) +(declare-function elfeed-search-show-entry "elfeed-search" (entry)) +;;;###autoload +(defun km/elfeed-avy-goto-subword-1 () + (interactive) + (let (avy-all-windows) + (call-interactively #'avy-goto-subword-1)) + (call-interactively #'elfeed-search-show-entry)) + (provide 'km-avy) ;;; km-avy.el ends here -- cgit v1.2.3