(text-scale-adjust): Bind `echo-keystrokes' to nil.

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1273

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b4b8b0988657af52f2900fa0fd8a521719f71fb7..ac85ca6d317794ee27a2b9943b9c8ebb3f726e69 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-06-21  Miles Bader  <miles@gnu.org>
+
+       * face-remap.el (text-scale-adjust): Bind `echo-keystrokes' to nil.
+
 2008-06-21  Alan Mackenzie  <acm@muc.de>
 
        * progmodes/cc-engine.el (c-guess-basic-syntax CASE 5D.5): Fix an

diff --git a/lisp/face-remap.el b/lisp/face-remap.el
index b58ee6c74cf40c41145ad4cd09d81807b5936124..32bba13d00d60ef618fca4d9316d7b79486ffe7b 100644 (file)
--- a/lisp/face-remap.el
+++ b/lisp/face-remap.el
@@ -281,7 +281,8 @@ a top-level keymap, `text-scale-increase' or
   (interactive "p")
   (let ((first t)
        (step t)
-       (ev last-command-event))
+       (ev last-command-event)
+       (echo-keystrokes nil))
     (while step
       (let ((base (event-basic-type ev)))
        (cond ((or (eq base ?+) (eq base ?=))