[elpa] master 974e55b 09/17: avy-jump.el (avy--line): Avoid image-mode and doc-view-mode

[Oleh Krehel]

branch: master
commit 974e55b792874cd4dab53bfc875b535001948a5f
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    avy-jump.el (avy--line): Avoid image-mode and doc-view-mode
    
    Fixes #1
---
 avy-jump.el |   23 ++++++++++++-----------
 1 files 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