summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorOleh Krehel <ohwoeowho@gmail.com>2016-08-14 11:50:36 +0200
committerOleh Krehel <ohwoeowho@gmail.com>2016-08-14 11:50:36 +0200
commit0f5e99b5e9a0fe709e5bce8ea4462dc732b2a281 (patch)
tree731af4dceb2647d92471b8d1f3edf1944a86d8b1
parenta9119039ee714ab2dc221ab08c816c59ff846f1c (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.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/avy.el b/avy.el
index 8ef6ef5..615debd 100644
--- a/avy.el
+++ b/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))