X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/1c5f6018d55ea3c0e5430cde60624e2232d87bec..1a27c64e1cf94e374cac95137b438b1651739074:/lisp/face-remap.el

diff --git a/lisp/face-remap.el b/lisp/face-remap.el
index 5067221585..f7f469b0cc 100644
--- a/lisp/face-remap.el
+++ b/lisp/face-remap.el
@@ -312,7 +312,7 @@ a top-level keymap, `text-scale-increase' or
       (when step
 	(text-scale-increase step)
 	(setq inc 1 first nil)
-	(setq ev (read-event))))
+	(setq ev (read-event "+,-,0 for further adjustment: "))))
     (push ev unread-command-events)))