From fa81f0107f8aa59f0e41aa24a295ee8abaadd3e7 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Wed, 14 Dec 2005 07:55:50 +0000 Subject: [PATCH] (isearch-query-replace): Use (mark) instead of isearch-opoint if mark is active in transient-mark-mode. --- lisp/ChangeLog | 5 +++++ lisp/isearch.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0493ee83f37..0843dab7a13 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-12-14 Juri Linkov + + * isearch.el (isearch-query-replace): Use (mark) instead of + isearch-opoint if mark is active in transient-mark-mode. + 2005-12-14 Aaron S. Hawley * isearch.el (isearch-query-replace): Check for isearch-other-end. diff --git a/lisp/isearch.el b/lisp/isearch.el index 6361177a345..846d749f2f0 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -1227,7 +1227,7 @@ Use `isearch-exit' to quit without signaling." (if (and isearch-other-end (< isearch-other-end (point)) (not (and transient-mark-mode mark-active - (< isearch-opoint (point))))) + (< (mark) (point))))) (goto-char isearch-other-end)) (set query-replace-from-history-variable (cons isearch-string -- 2.39.2