diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-03-28 22:27:56 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-03-28 22:27:56 +0000 |
| commit | 84a99e734479c251660ea072e35ffe8d28b70b16 (patch) | |
| tree | 4aeacba315dc6290521c498f25028b866b9b5bca /lisp/comint.el | |
| parent | 49f82b3d1a092f8e0d864982acaf9678e8571dd0 (diff) | |
| download | emacs-84a99e734479c251660ea072e35ffe8d28b70b16.tar.gz | |
(comint-read-noecho): Use a format string, in case
PROMPT contains a percent sign.
Diffstat (limited to 'lisp/comint.el')
| -rw-r--r-- | lisp/comint.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index a056ba51ea0..6e35bc0f572 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -1400,8 +1400,8 @@ applications." (done nil)) (while (not done) (if stars - (message "%s%s" prompt (make-string (length ans) ?*)) - (message prompt)) + (message "%s%s" prompt (make-string (length ans) ?*)) + (message "%s" prompt)) ;; Use this instead of `read-char' to avoid "Non-character input-event". (setq c (read-char-exclusive)) (cond ((= c ?\C-g) |