summaryrefslogtreecommitdiff
path: root/lisp/telnet.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-12-24 04:00:16 +0000
committerRichard M. Stallman <rms@gnu.org>1993-12-24 04:00:16 +0000
commit6cc0778f31ed602d77f889c67cb0ed421cdcde19 (patch)
tree5b35546fdaa3d44d92763d18e8962a587d451258 /lisp/telnet.el
parent457a9beedefeab952ad28f9705ffb21ce5b77479 (diff)
downloademacs-6cc0778f31ed602d77f889c67cb0ed421cdcde19.tar.gz
(telnet): Use comint-arguments.
Diffstat (limited to 'lisp/telnet.el')
-rw-r--r--lisp/telnet.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/telnet.el b/lisp/telnet.el
index 752883533e3..9ed833b1938 100644
--- a/lisp/telnet.el
+++ b/lisp/telnet.el
@@ -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 "*"))