From: Michael Heerdegen <michael_heerdegen@web.de>
Date: Thu, 31 Dec 2015 22:04:29 +0000 (+0100)
Subject: When coming from isearch, don't move to other end
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/68122d9b556d682332b1b3a64c67e78f0bf8f8d3

When coming from isearch, don't move to other end

when at match end
---

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index ff24166dd..0481fef73 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -848,12 +848,7 @@ Hit any key to proceed."
   (el-search-search-and-replace-pattern from to mapping))
 
 (defun el-search--take-over-from-isearch ()
-  (let ((other-end isearch-other-end)
-        (input isearch-string))
-    (isearch-exit)
-    (when (and other-end (< other-end (point)))
-      (goto-char other-end))
-    input))
+  (prog1 isearch-string (isearch-exit)))
 
 ;;;###autoload
 (defun el-search-search-from-isearch ()