summaryrefslogtreecommitdiff
path: root/lisp/subr.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-01-25 01:03:16 +0000
committerKarl Heuer <kwzh@gnu.org>1996-01-25 01:03:16 +0000
commit91a6acc3b825b71bf6a3a70beb8b809445cf3211 (patch)
tree13ea26a77db3cfd21426eb7a5cbee420dc39d228 /lisp/subr.el
parentb483a3c1bc5ab8ba4a2833a50b011477a853fcb8 (diff)
downloademacs-91a6acc3b825b71bf6a3a70beb8b809445cf3211.tar.gz
(read-quoted-char): Delete format call inside message.
Diffstat (limited to 'lisp/subr.el')
-rw-r--r--lisp/subr.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 206e415651c..11d22bb8f8f 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -625,8 +625,7 @@ or three octal digits representing its character code."))
((and (<= ?0 char) (<= char ?7))
(setq code (+ (* code 8) (- char ?0))
count (1+ count))
- (and prompt (message (setq prompt
- (format "%s %c" prompt char)))))
+ (and prompt (setq prompt (message "%s %c" prompt char))))
((> count 0)
(setq unread-command-events (list char) count 259))
(t (setq code char count 259))))