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

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 1efd9b21304543110ad8f6ee21545d01fac841ce..0879f948cff0293f5d660490e2ec46e1b2730610 100644 (file)
--- 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))