procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/cursor-sensor.el: Fix sensor behavior with overlays

Browse source 
(cursor-sensor--detect): Also consult overlay properties when checking
to see if we just moved inside the same "element" as opposed to
changing from one to another of the same type.
This commit is contained in:
Stefan Monnier 2019-03-08 17:20:58 -05:00
parent bec7fb2988
commit 76fdae8549
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/cursor-sensor.el
View file

@ -160,7 +160,7 @@ By convention, this is a list of symbols where each symbol stands for the
(setcdr old nil))
(if (or (and (null new) (null (cdr old)))
(and (eq new (cdr old))
(eq (next-single-property-change
(eq (next-single-char-property-change
start 'cursor-sensor-functions nil end)
end)))
;; Clearly nothing to do.
@ -172,7 +172,7 @@ By convention, this is a list of symbols where each symbol stands for the
(let ((pos start)
(missing nil))
(while (< pos end)
(setq pos (next-single-property-change
(setq pos (next-single-char-property-change
pos 'cursor-sensor-functions
nil end))
(unless (memq f (get-char-property