From 68122d9b556d682332b1b3a64c67e78f0bf8f8d3 Mon Sep 17 00:00:00 2001 From: Michael Heerdegen Date: Thu, 31 Dec 2015 23:04:29 +0100 Subject: [PATCH] When coming from isearch, don't move to other end when at match end --- packages/el-search/el-search.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) 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 () -- 2.39.2