diff options
| author | Karl Heuer | 1995-03-30 23:38:23 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-03-30 23:38:23 +0000 |
| commit | 23cb053e99bec14a4b02f4dec43ff501cf59b9c1 (patch) | |
| tree | af8d7e12fa6150742a99870ee8d8754b63d35390 | |
| parent | 04f7ec6929c3e4db2b5515e1e133a716f1bf8cb4 (diff) | |
| download | emacs-23cb053e99bec14a4b02f4dec43ff501cf59b9c1.tar.gz emacs-23cb053e99bec14a4b02f4dec43ff501cf59b9c1.zip | |
(comint-read-noecho): Don't log prompt messages.
| -rw-r--r-- | lisp/comint.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index 6e35bc0f572..a904779543f 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -1397,7 +1397,8 @@ applications." | |||
| 1397 | (c 0) | 1397 | (c 0) |
| 1398 | (echo-keystrokes 0) | 1398 | (echo-keystrokes 0) |
| 1399 | (cursor-in-echo-area t) | 1399 | (cursor-in-echo-area t) |
| 1400 | (done nil)) | 1400 | (message-log-max nil) |
| 1401 | (done nil)) | ||
| 1401 | (while (not done) | 1402 | (while (not done) |
| 1402 | (if stars | 1403 | (if stars |
| 1403 | (message "%s%s" prompt (make-string (length ans) ?*)) | 1404 | (message "%s%s" prompt (make-string (length ans) ?*)) |