From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 13 Oct 1998 03:45:04 +0000 (+0000)
Subject: (telnet-initial-filter): Use clear-this-command-keys.
X-Git-Tag: emacs-20.4~1511
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2a56a3540bd7bc58d4a9604ed67aa9a76a0d874f;p=emacs.git

(telnet-initial-filter): Use clear-this-command-keys.
---

diff --git a/lisp/telnet.el b/lisp/telnet.el
index 2bb605332aa..557d00534d4 100644
--- a/lisp/telnet.el
+++ b/lisp/telnet.el
@@ -141,7 +141,8 @@ rejecting one login and prompting again for a username and password.")
 	     (telnet-filter proc string)
 	     (setq telnet-count 0)
 	     (send-string proc (concat (comint-read-noecho "Password: " t)
-				       telnet-new-line)))
+				       telnet-new-line))
+	     (clear-this-command-keys))
 	    (t (telnet-check-software-type-initialize string)
 	       (telnet-filter proc string)
 	       (cond ((> telnet-count telnet-maximum-count)