comparison lisp/comint.el @ 11147:8c896f45f888

(comint-read-noecho): Use a format string, in case PROMPT contains a percent sign.
author Karl Heuer <kwzh@gnu.org>
date Tue, 28 Mar 1995 22:27:56 +0000
parents 77d7d3990300
children 31a046cedfc8
comparison
equal deleted inserted replaced
11146:9a14b32f5d71 11147:8c896f45f888
1398 (echo-keystrokes 0) 1398 (echo-keystrokes 0)
1399 (cursor-in-echo-area t) 1399 (cursor-in-echo-area t)
1400 (done nil)) 1400 (done nil))
1401 (while (not done) 1401 (while (not done)
1402 (if stars 1402 (if stars
1403 (message "%s%s" prompt (make-string (length ans) ?*)) 1403 (message "%s%s" prompt (make-string (length ans) ?*))
1404 (message prompt)) 1404 (message "%s" prompt))
1405 ;; Use this instead of `read-char' to avoid "Non-character input-event". 1405 ;; Use this instead of `read-char' to avoid "Non-character input-event".
1406 (setq c (read-char-exclusive)) 1406 (setq c (read-char-exclusive))
1407 (cond ((= c ?\C-g) 1407 (cond ((= c ?\C-g)
1408 ;; This function may get called from a process filter, where 1408 ;; This function may get called from a process filter, where
1409 ;; inhibit-quit is set. In later versions of emacs read-char 1409 ;; inhibit-quit is set. In later versions of emacs read-char