diff options
Diffstat (limited to 'lisp')
| -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) |