diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2014-11-13 00:08:58 -0500 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2014-11-13 00:08:58 -0500 |
| commit | 4e6f2b551794d19df6c899cb78d070061a3e41b0 (patch) | |
| tree | 1941cc39ffd090401591ed38196ef07246e39e0a /lisp/init-gnus.el | |
| parent | 34d72f833828f2ef5f174cbbfc23bd69b67fbe42 (diff) | |
| download | emacs.d-4e6f2b551794d19df6c899cb78d070061a3e41b0.tar.gz | |
gnus: Show article after ace-jumping
Diffstat (limited to 'lisp/init-gnus.el')
| -rw-r--r-- | lisp/init-gnus.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/init-gnus.el b/lisp/init-gnus.el index bd0f072..3fbbd51 100644 --- a/lisp/init-gnus.el +++ b/lisp/init-gnus.el @@ -269,6 +269,11 @@ read. Don't ask to confirm." "Go to next group without selecting the first article." (ad-set-arg 0 t)) +(defun km/gnus-setup-local-ace-jump () + (add-hook 'ace-jump-mode-end-hook '(lambda () (gnus-summary-scroll-up 0)) + nil t)) +(add-hook 'gnus-summary-mode-hook 'km/gnus-setup-local-ace-jump) + ;; This overrides `gnus-summary-post-news', which is also bound to ;; 'S p'. (define-key gnus-summary-mode-map "a" 'ace-jump-mode) |