avy-jump.el (avi--line): Fixup the issue with org outlines

Re #33
abo-abo · May 4, 2015 · f92689a · f92689a
1 parent 17b44a8
commit f92689a
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/avy-jump.el b/avy-jump.el
@@ -257,14 +257,17 @@ Read one char with which the word should start."
 (defun avi--line ()
   "Select line in current window."
   (let ((avi-background nil)
+        (ws (window-start))
         candidates)
     (save-excursion
       (save-restriction
-        (narrow-to-region (window-start) (window-end (selected-window) t))
+        (narrow-to-region ws (window-end (selected-window) t))
         (goto-char (point-min))
         (while (< (point) (point-max))
-          (push (cons (point) (selected-window))
-                candidates)
+          (unless (get-char-property
+                   (max (1- (point)) ws) 'invisible)
+            (push (cons (point) (selected-window))
+                  candidates))
           (forward-line 1))))
     (avi--process (nreverse candidates) #'avi--overlay-pre)))