branch: elpa/isl
commit f0a3dfdf5c63a9895db2547243930e374b2c70d9
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>

    Consume first member of iterator to ensure *next go
    
    immediately to next elm.
---
 isearch-light.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/isearch-light.el b/isearch-light.el
index 811029959a9..5ffd8df683d 100644
--- a/isearch-light.el
+++ b/isearch-light.el
@@ -96,8 +96,9 @@
                 'face '(:foreground "Gray")))
             (setq il-search-last-overlay
                   (il-search-closest-overlay (point) il-search-item-overlays))
-            (goto-char (overlay-start il-search-last-overlay))
-            (il-search--set-iterator)))))))
+            (overlay-put il-search-last-overlay 'face '(:background "green"))
+            (il-search--set-iterator)
+            (goto-char (overlay-start (iterator:next 
il-search-iterator)))))))))
 
 (defun il-search-closest-overlay (pos overlays)
   "Return closest overlay from POS in OVERLAYS list."

Reply via email to