emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 74501e1 094/110: avy.el: More fixes to org-toggle-link-dis


From: Oleh Krehel
Subject: [elpa] master 74501e1 094/110: avy.el: More fixes to org-toggle-link-display
Date: Sat, 11 May 2019 10:15:52 -0400 (EDT)

branch: master
commit 74501e1235e0d39b7e6f8cc6b63e6c29c0e35504
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    avy.el: More fixes to org-toggle-link-display
    
    Fix `avy-goto-subword-0', `avy-goto-subword-1', `avy-goto-char-timer'.
    
    Re #261
---
 avy.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/avy.el b/avy.el
index 836153a..560401a 100644
--- a/avy.el
+++ b/avy.el
@@ -1409,7 +1409,7 @@ BEG and END narrow the scope where candidates are 
searched."
                 (while (> (point) ws)
                   (when (or (null predicate)
                             (and predicate (funcall predicate)))
-                    (unless (get-char-property (point) 'invisible)
+                    (unless (not (avy--visible-p (point)))
                       (push (cons (point) (selected-window)) window-cands)))
                   (subword-backward))
                 (and (= (point) ws)
@@ -1956,7 +1956,7 @@ Otherwise, the whole regex is highlighted."
                        (goto-char (car pair))
                        (setq regex (funcall re-builder str))
                        (while (re-search-forward regex (cdr pair) t)
-                         (unless (get-char-property (1- (point)) 'invisible)
+                         (unless (not (avy--visible-p (1- (point))))
                            (let* ((idx (if (= (length (match-data)) 4) 1 0))
                                   (ov (make-overlay
                                        (match-beginning idx) (match-end idx))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]