master f2fb69f: * lisp/isearch.el (isearch-search): Set isearch-match-data in the right place.

[Juri Linkov]

branch: master
commit f2fb69f08ed7783406639de09747529c24416983
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    * lisp/isearch.el (isearch-search): Set isearch-match-data in the right 
place.
---
 lisp/isearch.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 1efd9b2..0879f94 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -3451,10 +3451,10 @@ Optional third argument, if t, means if fail just 
return nil (no error).
                           (match-beginning 0) (match-end 0)))
              (setq retry nil)))
        (setq isearch-just-started nil)
-       (setq isearch-match-data (match-data t))
-       (if isearch-success
-           (setq isearch-other-end
-                 (if isearch-forward (match-beginning 0) (match-end 0)))))
+       (when isearch-success
+         (setq isearch-other-end
+               (if isearch-forward (match-beginning 0) (match-end 0)))
+          (setq isearch-match-data (match-data t))))
 
     (quit (isearch-unread ?\C-g)
          (setq isearch-success nil))