emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100124: face-remap.el (text-scale


From: Kenichi Handa
Subject: [Emacs-diffs] /srv/bzr/emacs/emacs-23 r100124: face-remap.el (text-scale-adjust): Call read-event with a proper prompt.
Date: Wed, 20 Oct 2010 09:46:46 +0900
User-agent: Bazaar (2.0.3)

------------------------------------------------------------
revno: 100124 [merge]
committer: Kenichi Handa <address@hidden>
branch nick: emacs-23
timestamp: Wed 2010-10-20 09:46:46 +0900
message:
  face-remap.el (text-scale-adjust): Call read-event with a proper prompt.
modified:
  lisp/ChangeLog
  lisp/face-remap.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-10-19 11:52:29 +0000
+++ b/lisp/ChangeLog    2010-10-20 00:46:21 +0000
@@ -1,3 +1,8 @@
+2010-10-20  Kenichi Handa  <address@hidden>
+
+       * face-remap.el (text-scale-adjust): Call read-event with a proper
+       prompt.
+
 2010-10-19  Michael Albinus  <address@hidden>
 
        * net/tramp.el (tramp-do-file-attributes-with-stat)

=== modified file 'lisp/face-remap.el'
--- a/lisp/face-remap.el        2010-01-13 08:35:10 +0000
+++ b/lisp/face-remap.el        2010-10-20 00:32:53 +0000
@@ -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)))
 
 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]