diff options
author | Karl Heuer <kwzh@gnu.org> | 1996-01-25 01:03:16 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1996-01-25 01:03:16 +0000 |
commit | 91a6acc3b825b71bf6a3a70beb8b809445cf3211 (patch) | |
tree | 13ea26a77db3cfd21426eb7a5cbee420dc39d228 /lisp/subr.el | |
parent | b483a3c1bc5ab8ba4a2833a50b011477a853fcb8 (diff) | |
download | emacs-91a6acc3b825b71bf6a3a70beb8b809445cf3211.tar.gz |
(read-quoted-char): Delete format call inside message.
Diffstat (limited to 'lisp/subr.el')
-rw-r--r-- | lisp/subr.el | 3 |
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)))) |