From 2c04fe5ec1c87ccb16b0d32bfe0b58f8e2978afe Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Tue, 1 Sep 2015 00:06:51 -0400 Subject: Limit some avy-goto-subword-1 variants to one window --- lisp/init-mail.el | 3 ++- lisp/init-org.el | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/init-mail.el b/lisp/init-mail.el index 054dfa1..5bb4e54 100644 --- a/lisp/init-mail.el +++ b/lisp/init-mail.el @@ -79,7 +79,8 @@ is off." (defun km/gnus-avy-goto-subword-and-select () (interactive) - (call-interactively #'avy-goto-subword-1) + (let (avy-all-windows) + (call-interactively #'avy-goto-subword-1)) (gnus-summary-scroll-up 0)) (defun km/gnus-follow-last-message-link (copy) diff --git a/lisp/init-org.el b/lisp/init-org.el index 7cdb27f..b4e5eb0 100644 --- a/lisp/init-org.el +++ b/lisp/init-org.el @@ -471,7 +471,8 @@ displayed in the agenda." (defun km/org-agenda-avy-goto-subword-1 () (interactive) - (call-interactively #'avy-goto-subword-1) + (let (avy-all-windows) + (call-interactively #'avy-goto-subword-1)) (org-agenda-do-context-action)) (define-key km/global-org-map "a" 'org-agenda) -- cgit v1.2.3