# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1134546887 0
# Node ID 4b2351f7912e3f768e167c46c31f54a5fce00780
# Parent  e8e39ab46dd81e1753346c0fc16061ba3f6c55bb
(isearch-query-replace): Use (mark) instead of
isearch-opoint if mark is active in transient-mark-mode.

diff -r e8e39ab46dd8 -r 4b2351f7912e lisp/isearch.el
--- a/lisp/isearch.el	Wed Dec 14 07:52:22 2005 +0000
+++ b/lisp/isearch.el	Wed Dec 14 07:54:47 2005 +0000
@@ -1227,7 +1227,7 @@
     (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