[elpa] master 66961f8 138/399: swiper.el (swiper-isearch-action): Add a cursor overlay

[Oleh Krehel]

branch: master
commit 66961f8b890bcfc809e04d936cbd2cd812b554ad
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    swiper.el (swiper-isearch-action): Add a cursor overlay
    
    Re #1931
---
 swiper.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/swiper.el b/swiper.el
index 295640a..a5d3014 100644
--- a/swiper.el
+++ b/swiper.el
@@ -1164,7 +1164,10 @@ See `ivy-format-function' for further information."
                                  (line-end-position))
         (unless (eq ivy-exit 'done)
           (swiper--cleanup)
-          (swiper--add-overlays (ivy--regex ivy-text))))
+          (swiper--add-overlays (ivy--regex ivy-text))
+          (let ((ov (make-overlay (point) (1+ (point)))))
+            (overlay-put ov 'face 'ivy-cursor)
+            (push ov swiper--overlays))))
     (swiper--cleanup)))
 
 (defun swiper-isearch (&optional initial-input)