Mercurial > emacs

changeset 1418:d8dc740867ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(telnet): Do erase-buffer after the initial output.
author Richard M. Stallman <rms@gnu.org>
date Fri, 16 Oct 1992 01:35:47 +0000
parents 3a1576d52874
children 029bee59c092
files lisp/telnet.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/telnet.el	Thu Oct 15 23:44:00 1992 +0000
+++ b/lisp/telnet.el	Fri Oct 16 01:35:47 1992 +0000
@@ -157,9 +157,9 @@
   (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)))