mirror of
https://github.com/abo-abo/avy.git
synced 2025-10-13 13:33:03 +00:00
avy.el: Use next-char-property-change, not next-overlay-change
* avy.el (avy--next-visible-point): (avy--next-invisible-point): Update. Fixes #168
This commit is contained in:
parent
a9119039ee
commit
0f5e99b5e9
4
avy.el
4
avy.el
@ -632,14 +632,14 @@ Use OVERLAY-FN to visualize the decision overlay."
|
||||
(defun avy--next-visible-point ()
|
||||
"Return the next closest point without 'invisible property."
|
||||
(let ((s (point)))
|
||||
(while (and (not (= (point-max) (setq s (next-overlay-change s))))
|
||||
(while (and (not (= (point-max) (setq s (next-char-property-change s))))
|
||||
(get-char-property s 'invisible)))
|
||||
s))
|
||||
|
||||
(defun avy--next-invisible-point ()
|
||||
"Return the next closest point with 'invisible property."
|
||||
(let ((s (point)))
|
||||
(while (and (not (= (point-max) (setq s (next-overlay-change s))))
|
||||
(while (and (not (= (point-max) (setq s (next-char-property-change s))))
|
||||
(not (get-char-property s 'invisible))))
|
||||
s))
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user