[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master f2fb69f: * lisp/isearch.el (isearch-search): Set isearch-match-da
From: |
Juri Linkov |
Subject: |
master f2fb69f: * lisp/isearch.el (isearch-search): Set isearch-match-data in the right place. |
Date: |
Mon, 12 Oct 2020 15:56:53 -0400 (EDT) |
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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master f2fb69f: * lisp/isearch.el (isearch-search): Set isearch-match-data in the right place.,
Juri Linkov <=