master a4d40a32cc: Make exit from text-scale-adjust less confusing

[Lars Ingebrigtsen]

branch: master
commit a4d40a32ccea3ce95300797c8d5032fef5d1f82c
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Make exit from text-scale-adjust less confusing
    
    * lisp/face-remap.el (text-scale-adjust): Clear the prompt after
    exiting (bug#25978).
---
 lisp/face-remap.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/face-remap.el b/lisp/face-remap.el
index 3675ea14b4..34cd030652 100644
--- a/lisp/face-remap.el
+++ b/lisp/face-remap.el
@@ -395,7 +395,11 @@ a top-level keymap, `text-scale-increase' or
            (dolist (key '(?- ?+ ?= ?0)) ;; = is often unshifted +.
              (define-key map (vector (append mods (list key)))
                (lambda () (interactive) (text-scale-adjust (abs inc))))))
-         map))))) ;; )
+         map)
+       nil
+       ;; Clear the prompt after exiting.
+       (lambda ()
+         (message ""))))))
 
 (defvar-local text-scale--pinch-start-scale 0
   "The text scale at the start of a pinch sequence.")