diff options
| author | Mark Oteiza <mvoteiza@udel.edu> | 2016-11-07 22:11:39 -0500 |
|---|---|---|
| committer | Mark Oteiza <mvoteiza@udel.edu> | 2016-11-07 22:11:39 -0500 |
| commit | d3e22a1210e2a054f6f6aed44a3b98f6bbcd4546 (patch) | |
| tree | e9ae0567d480dde4d4efca81f6849131f4611b12 | |
| parent | 73d47d22197175f08b2dd62e76d7138872e611d2 (diff) | |
| download | emacs-d3e22a1210e2a054f6f6aed44a3b98f6bbcd4546.tar.gz | |
Prescribe history for read-regexp in query-replace
In the fix for bug#24580, the history argument for read-regexp was
removed erroneously; read-regexp's history argument defaults to
regexp-history, not minibuffer-history.
* lisp/replace.el (query-replace-read-from): Tell read-regexp to use
minibuffer-history. Fixes bug#24873.
| -rw-r--r-- | lisp/replace.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 4fc48d4c7a8..60948efeea6 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -198,7 +198,7 @@ wants to replace FROM with TO." (setq-local text-property-default-nonsticky (cons '(separator . t) text-property-default-nonsticky))) (if regexp-flag - (read-regexp prompt) + (read-regexp prompt nil 'minibuffer-history) (read-from-minibuffer prompt nil nil nil nil (car (if regexp-flag regexp-search-ring search-ring)) t))))) |