ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-14 05:43:04 +00:00
Code Issues Packages Projects Releases Wiki Activity

avy.el (avy--overlay-at-full): Check overlay window

Browse Source 
* avy.el (avy--overlay-at-full): Update.

Re #47
This commit is contained in:
Oleh Krehel 2015-05-18 19:14:03 +02:00
parent 92a7884d9c
commit a4f4015db4
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
avy.el
View File

@ -460,7 +460,8 @@ LEAF is normally ((BEG . END) . WND)."
(save-excursion (save-excursion
(goto-char beg) (goto-char beg)
(when (cl-some (lambda (o) (when (cl-some (lambda (o)
(eq (overlay-get o 'category) 'avy)) (and (eq (overlay-get o 'category) 'avy)
(eq (overlay-get o 'window) wnd)))
(overlays-in (point) (min (+ (point) len) (overlays-in (point) (min (+ (point) len)
(line-end-position)))) (line-end-position))))
(setq str (substring str 0 1)) (setq str (substring str 0 1))