diff options
author | Kyle Meyer <kyle@kyleam.com> | 2015-05-29 22:33:20 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2015-05-29 22:33:20 -0400 |
commit | 8fccff249687308542d490ed00d1e0a68a44b9f2 (patch) | |
tree | ee51d755ede982c6488afbcbc7d2d7e744a975b7 /lisp/init-gnus.el | |
parent | 1da884c4e33fbce3e137c4958ceecbfad3bcf7f7 (diff) | |
download | emacs.d-8fccff249687308542d490ed00d1e0a68a44b9f2.tar.gz |
Use avy instead of ace-jump-mode
Diffstat (limited to 'lisp/init-gnus.el')
-rw-r--r-- | lisp/init-gnus.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/init-gnus.el b/lisp/init-gnus.el index e556b53..6abfd04 100644 --- a/lisp/init-gnus.el +++ b/lisp/init-gnus.el @@ -94,11 +94,10 @@ is off." (setq gnus-thread-hide-subtree t gnus-thread-sort-functions '(gnus-thread-sort-by-most-recent-number)) -(add-hook 'gnus-summary-mode-hook 'km/gnus-setup-local-ace-jump) - -(defun km/gnus-setup-local-ace-jump () - (add-hook 'ace-jump-mode-end-hook (lambda () (gnus-summary-scroll-up 0)) - nil t)) +(defun km/gnus-avy-goto-subword-and-select () + (interactive) + (call-interactively #'avy-goto-subword-1) + (gnus-summary-scroll-up 0)) (defun km/gnus-follow-last-message-link (copy) "Follow shr link at bottom of message. @@ -173,7 +172,7 @@ to group buffer instead of moving to next group." ;; 'S p'. (define-key gnus-summary-mode-map "c" 'km/gnus-summary-catchup) (define-key gnus-summary-mode-map "e" 'gnus-summary-scroll-up) -(define-key gnus-summary-mode-map "j" 'ace-jump-mode) +(define-key gnus-summary-mode-map "j" 'km/gnus-avy-goto-subword-and-select) (define-key gnus-article-mode-map (kbd "C-c l") 'km/gnus-follow-last-message-link) |