mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source
This commit is contained in:
Juri Linkov 2020-10-12 22:56:35 +03:00
parent a6c22271bc
commit f2fb69f08e
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/isearch.el
View file

@ -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))