changeset 111151:cc1681970a9e

face-remap.el (text-scale-adjust): Call read-event with a proper prompt.
author Kenichi Handa <handa@m17n.org>
date Wed, 20 Oct 2010 09:46:46 +0900
parents 497ac3b669cd (current diff) 8b6c4202fa46 (diff)
children 66c4966c6256
files
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Tue Oct 19 13:52:29 2010 +0200
+++ b/lisp/ChangeLog	Wed Oct 20 09:46:46 2010 +0900
@@ -1,3 +1,8 @@
+2010-10-20  Kenichi Handa  <handa@m17n.org>
+
+	* face-remap.el (text-scale-adjust): Call read-event with a proper
+	prompt.
+
 2010-10-19  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-do-file-attributes-with-stat)
--- a/lisp/face-remap.el	Tue Oct 19 13:52:29 2010 +0200
+++ b/lisp/face-remap.el	Wed Oct 20 09:46:46 2010 +0900
@@ -312,7 +312,7 @@
       (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)))