ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-13 13:33:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

avy-jump.el (avy--line): Avoid image-mode and doc-view-mode

Browse Source 
Fixes #1
This commit is contained in:
Oleh Krehel 2015-05-07 13:02:20 +02:00
parent e9d2e60965
commit 974e55b792
1 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
avy-jump.el
View File

@ -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