diff options
| author | Richard M. Stallman <rms@gnu.org> | 1992-10-16 01:35:47 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1992-10-16 01:35:47 +0000 |
| commit | 8a4827a6fe1459570fa4ba8f64010ebfc6dfe46a (patch) | |
| tree | 8a79d7789456306df4654cce4f0a96ebe8e19c99 /lisp/telnet.el | |
| parent | dbe8b38117e5df16d50c55542cb008b30bbf09be (diff) | |
| download | emacs-8a4827a6fe1459570fa4ba8f64010ebfc6dfe46a.tar.gz | |
(telnet): Do erase-buffer after the initial output.
Diffstat (limited to 'lisp/telnet.el')
| -rw-r--r-- | lisp/telnet.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/telnet.el b/lisp/telnet.el index 26160ac4df4..ad13c05915b 100644 --- a/lisp/telnet.el +++ b/lisp/telnet.el @@ -157,9 +157,9 @@ Normally input is edited in Emacs and sent a line at a time." (let ((name (concat arg "-telnet" ))) (switch-to-buffer (make-comint name "telnet")) (set-process-filter (get-process name) 'telnet-initial-filter) - (erase-buffer) ;; Don't send the `open' cmd till telnet is ready for it. (accept-process-output (get-process name)) + (erase-buffer) (send-string name (concat "open " arg "\n")) (telnet-mode) (setq telnet-count telnet-initial-count))) |