Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-25 06:17:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

(telnet): Use comint-arguments.

Browse source
This commit is contained in:
Richard M. Stallman 1993-12-24 04:00:16 +00:00
parent 457a9beede
commit 6cc0778f31
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/telnet.el
View file

@ -184,7 +184,8 @@ Communication with HOST is recorded in a buffer *HOST-telnet*.
Normally input is edited in Emacs and sent a line at a time."
(interactive "sOpen telnet connection to host: ")
(setq host (comint-canonicalize-args host))
(let* ((name (concat host "-telnet" ))
(let* ((comint-delimiter-argument-list '(" " "\t"))
(name (concat (comint-arguments host 0 nil) "-telnet" ))
(buffer (get-buffer (concat "*" name "*"))))
(if (and buffer (get-buffer-process buffer))
(switch-to-buffer (concat "*" name "*"))