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

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

[elpa] master eb1e636 253/399: swiper.el (swiper--add-cursor-overlay): D


From: Oleh Krehel
Subject: [elpa] master eb1e636 253/399: swiper.el (swiper--add-cursor-overlay): Display only in current window
Date: Sat, 20 Jul 2019 14:57:34 -0400 (EDT)

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

    swiper.el (swiper--add-cursor-overlay): Display only in current window
---
 swiper.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/swiper.el b/swiper.el
index 377db44..09c51e8 100644
--- a/swiper.el
+++ b/swiper.el
@@ -775,11 +775,12 @@ Matched candidates should have `swiper-invocation-face'."
     (goto-char (point-min))
     (isearch-clean-overlays)))
 
-(defun swiper--add-cursor-overlay ()
+(defun swiper--add-cursor-overlay (wnd)
   (let ((ov (make-overlay (point) (if (eolp) (point) (1+ (point))))))
     (if (eolp)
         (overlay-put ov 'after-string (propertize " " 'face 'ivy-cursor))
       (overlay-put ov 'face 'ivy-cursor))
+    (overlay-put ov 'window wnd)
     (push ov swiper--overlays)))
 
 (defun swiper--add-line-overlay (wnd)
@@ -1285,7 +1286,8 @@ come back to the same place as when \"a\" was initially 
entered.")
         (unless (eq ivy-exit 'done)
           (swiper--cleanup)
           (swiper--add-overlays (ivy--regex ivy-text))
-          (swiper--add-cursor-overlay)))
+          (swiper--add-cursor-overlay
+           (ivy-state-window ivy-last))))
     (swiper--cleanup)))
 
 (defun swiper-isearch-thing-at-point ()



reply via email to

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