From 7e4b45ada37f902d71e9a9d84aab89dc43534430 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 30 May 2015 02:47:55 -0400 Subject: Add ace-link-widget command --- lisp/init-mail.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'lisp/init-mail.el') diff --git a/lisp/init-mail.el b/lisp/init-mail.el index e385e82..7b7990f 100644 --- a/lisp/init-mail.el +++ b/lisp/init-mail.el @@ -173,10 +173,13 @@ to group buffer instead of moving to next group." (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" 'km/gnus-avy-goto-subword-and-select) +(define-key gnus-summary-mode-map "o" 'km/ace-link-widget) (define-key gnus-article-mode-map (kbd "C-c l") 'km/gnus-follow-last-message-link) (define-key gnus-article-mode-map "e" 'km/shr-browse-url-and-goto-next) +;; This overrides `gnus-summary-save-article', which is also on 'O o'. +(define-key gnus-article-mode-map "o" 'km/ace-link-widget) (define-prefix-command 'km/gnus-summary-prefix-map) (define-key gnus-summary-mode-map (kbd "C-c m") 'km/gnus-summary-prefix-map) @@ -342,6 +345,8 @@ has an effect if Gnus is not currently open." (define-key notmuch-show-mode-map (kbd "C-c C-c") 'km/notmuch-goto-message-in-gnus) (define-key gnus-group-mode-map "GG" 'notmuch-search) +(define-key notmuch-hello-mode-map "o" 'km/ace-link-widget) + (define-key km/mail-map "n" 'notmuch-search) (define-prefix-command 'km/notmuch-show-prefix-map) -- cgit v1.2.3