diff options
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index c28c9b36f05..4916cb138e6 100644 --- a/lisp/replace.el +++ b/lisp/replace.el | |||
| @@ -2619,6 +2619,7 @@ It must return a string." | |||
| 2619 | (let ((stack-idx 0) | 2619 | (let ((stack-idx 0) |
| 2620 | (stack-len (length stack)) | 2620 | (stack-len (length stack)) |
| 2621 | (num-replacements 0) | 2621 | (num-replacements 0) |
| 2622 | (nocasify t) ; Undo must preserve case (Bug#31073). | ||
| 2622 | search-string | 2623 | search-string |
| 2623 | next-replacement) | 2624 | next-replacement) |
| 2624 | (while (and (< stack-idx stack-len) | 2625 | (while (and (< stack-idx stack-len) |