aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/replace.el
diff options
context:
space:
mode:
authorGlenn Morris2019-08-20 09:04:53 -0700
committerGlenn Morris2019-08-20 09:04:53 -0700
commitaf103ef3c9d6df07475e2b3a2f846246d7fd2a8b (patch)
treea7e0a0cb7db56b68b8b3a0c3c29a6b90d61edff7 /lisp/replace.el
parent989c85e799b7c3a425d3d03f98ecd55d5cf76022 (diff)
parent615cff42580a3521c1a4ea7c3ec467eb8259e1c7 (diff)
downloademacs-af103ef3c9d6df07475e2b3a2f846246d7fd2a8b.tar.gz
emacs-af103ef3c9d6df07475e2b3a2f846246d7fd2a8b.zip
Merge from origin/emacs-26
615cff4 (origin/emacs-26) Fix process filter documentation (Bug#13400) beb1d22 Fix query-replace-regexp undo feature # Conflicts: # test/lisp/replace-tests.el
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index 7c6c6fc9b7f..ad9be77a79b 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -2728,7 +2728,8 @@ characters."
2728 (setq real-match-data 2728 (setq real-match-data
2729 (save-excursion 2729 (save-excursion
2730 (goto-char (match-beginning 0)) 2730 (goto-char (match-beginning 0))
2731 (looking-at search-string) 2731 ;; We must quote the string (Bug#37073)
2732 (looking-at (regexp-quote search-string))
2732 (match-data t (nth 2 elt))) 2733 (match-data t (nth 2 elt)))
2733 noedit 2734 noedit
2734 (replace-match-maybe-edit 2735 (replace-match-maybe-edit
@@ -2738,7 +2739,9 @@ characters."
2738 real-match-data 2739 real-match-data
2739 (save-excursion 2740 (save-excursion
2740 (goto-char (match-beginning 0)) 2741 (goto-char (match-beginning 0))
2741 (looking-at next-replacement) 2742 (if regexp-flag
2743 (looking-at next-replacement)
2744 (looking-at (regexp-quote next-replacement)))
2742 (match-data t (nth 2 elt)))) 2745 (match-data t (nth 2 elt))))
2743 ;; Set replaced nil to keep in loop 2746 ;; Set replaced nil to keep in loop
2744 (when (eq def 'undo-all) 2747 (when (eq def 'undo-all)