From 974e55b792874cd4dab53bfc875b535001948a5f Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Thu, 7 May 2015 13:02:20 +0200 Subject: [PATCH] avy-jump.el (avy--line): Avoid image-mode and doc-view-mode Fixes #1 --- avy-jump.el | 23 ++++++++++++----------- 1 file changed, 12 insertions(+), 11 deletions(-) diff --git a/avy-jump.el b/avy-jump.el index 5f8334a..89b8423 100644 --- a/avy-jump.el +++ b/avy-jump.el @@ -339,17 +339,18 @@ The window scope is determined by `avy-all-windows' (ARG negates it)." (window-list) (list (selected-window)))) (with-selected-window wnd - (let ((ws (window-start))) - (save-excursion - (save-restriction - (narrow-to-region ws (window-end (selected-window) t)) - (goto-char (point-min)) - (while (< (point) (point-max)) - (unless (get-char-property - (max (1- (point)) ws) 'invisible) - (push (cons (point) (selected-window)) - candidates)) - (forward-line 1))))))) + (unless (memq major-mode '(image-mode doc-view-mode)) + (let ((ws (window-start))) + (save-excursion + (save-restriction + (narrow-to-region ws (window-end (selected-window) t)) + (goto-char (point-min)) + (while (< (point) (point-max)) + (unless (get-char-property + (max (1- (point)) ws) 'invisible) + (push (cons (point) (selected-window)) + candidates)) + (forward-line 1)))))))) (avy--process (nreverse candidates) #'avy--overlay-pre))) ;;;###autoload