diff options
author | Juri Linkov <juri@linkov.net> | 2019-11-10 23:21:46 +0200 |
---|---|---|
committer | Juri Linkov <juri@linkov.net> | 2019-11-10 23:21:46 +0200 |
commit | 7e151f5bcfe431c31528743705e6ab56cf8dc220 (patch) | |
tree | a7a44848063b2e0483f57d5eb7d756edc77af137 /lisp/autorevert.el | |
parent | 0154e41b184a0b9938fafd9eca15399b4d5e477f (diff) | |
download | emacs-7e151f5bcfe431c31528743705e6ab56cf8dc220.tar.gz |
* lisp/autorevert.el: Use 'minibuffer-message' to not obscure the prompt.
* lisp/autorevert.el (auto-revert-handler): Use 'minibuffer-message'
instead of 'message'. Call it from the original window's buffer
that in case of the minibuffer should be current, so
minibuffer-message could add a message to it. (Bug#34614)
* lisp/emacs-lisp/ert-x.el (ert--make-message-advice): Add nil to
the list of values to not use for format-message, because
minibuffer-message calls 'message' with nil argument, and tests fail.
Diffstat (limited to 'lisp/autorevert.el')
-rw-r--r-- | lisp/autorevert.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/autorevert.el b/lisp/autorevert.el index 9275513c8d2..079750a3f6a 100644 --- a/lisp/autorevert.el +++ b/lisp/autorevert.el @@ -815,7 +815,8 @@ This is an internal function used by Auto-Revert Mode." (when revert (when (and auto-revert-verbose (not (eq revert 'fast))) - (message "Reverting buffer `%s'." (buffer-name))) + (with-current-buffer (window-buffer (old-selected-window)) + (minibuffer-message "Reverting buffer `%s'." (buffer-name)))) ;; If point (or a window point) is at the end of the buffer, we ;; want to keep it at the end after reverting. This allows one ;; to tail a file. |