diff options
| author | Juri Linkov | 2022-06-14 19:35:02 +0300 |
|---|---|---|
| committer | Juri Linkov | 2022-06-14 19:35:02 +0300 |
| commit | 175bc8e5a53740432c844b5aae1981d4f47c96f7 (patch) | |
| tree | 1cd1b7e443191e2c2e268fb07d5340f40123d515 | |
| parent | d8f9cf7772f87ed3f34890c16e170260fa424e19 (diff) | |
| download | emacs-175bc8e5a53740432c844b5aae1981d4f47c96f7.tar.gz emacs-175bc8e5a53740432c844b5aae1981d4f47c96f7.zip | |
* lisp/replace.el (read-regexp): Use minibuffer-message in the minibuffer.
| -rw-r--r-- | lisp/replace.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index c9d41d3fa39..c5c24c7a365 100644 --- a/lisp/replace.el +++ b/lisp/replace.el | |||
| @@ -968,10 +968,11 @@ respect this or not; see `read-regexp-case-fold-search'.)" | |||
| 968 | 'inhibit-fold)))) | 968 | 'inhibit-fold)))) |
| 969 | 'inhibit-fold | 969 | 'inhibit-fold |
| 970 | 'fold)) | 970 | 'fold)) |
| 971 | (message "Case folding is now %s" | 971 | (minibuffer-message |
| 972 | (if (eq case-fold 'fold) | 972 | "Case folding is now %s" |
| 973 | "on" | 973 | (if (eq case-fold 'fold) |
| 974 | "off")))) | 974 | "on" |
| 975 | "off")))) | ||
| 975 | nil (or history 'regexp-history) suggestions t)) | 976 | nil (or history 'regexp-history) suggestions t)) |
| 976 | (result (if (equal input "") | 977 | (result (if (equal input "") |
| 977 | ;; Return the default value when the user enters | 978 | ;; Return the default value when the user enters |