diff options
author | Oleh Krehel <ohwoeowho@gmail.com> | 2016-08-14 11:50:36 +0200 |
---|---|---|
committer | Oleh Krehel <ohwoeowho@gmail.com> | 2016-08-14 11:50:36 +0200 |
commit | 0f5e99b5e9a0fe709e5bce8ea4462dc732b2a281 (patch) | |
tree | 731af4dceb2647d92471b8d1f3edf1944a86d8b1 | |
parent | a9119039ee714ab2dc221ab08c816c59ff846f1c (diff) |
avy.el: Use next-char-property-change, not next-overlay-change
* avy.el (avy--next-visible-point):
(avy--next-invisible-point): Update.
Fixes #168
-rw-r--r-- | avy.el | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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)) |