jm36+@ANDREW.CMU.EDU (John Gardiner Myers) (12/20/89)
telnet-initial-filter sets the global symbol "password" to the password to the string it read from the user. The following patch puts the variable inside a let binding. *** /usr/contributed/lib/gnu-emacs/lisp/telnet.el Thu Nov 3 17:39:33 1988 --- /tmp/telnet.el Wed Dec 20 00:02:34 1989 *************** *** 85,94 **** (error "No such host.")) ((string-match "passw" string) (telnet-filter proc string) ! (let ((echo-keystrokes 0)) ! (setq password (read-password))) ! (setq telnet-count 0) ! (send-string proc (concat password telnet-new-line))) (t (telnet-check-software-type-initialize string) (telnet-filter proc string) (cond ((> telnet-count 4) --- 85,95 ---- (error "No such host.")) ((string-match "passw" string) (telnet-filter proc string) ! (let ((password ! (let ((echo-keystrokes 0)) ! (read-password)))) ! (setq telnet-count 0) ! (send-string proc (concat password telnet-new-line)))) (t (telnet-check-software-type-initialize string) (telnet-filter proc string) (cond ((> telnet-count 4)