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
commit9f2d25e54dbf7b3c3a7fbe4c3c3415f8e3e6f65f (patch)
tree1fbf32cb252126be973a692df0ec9a7c4e4af955 /lisp/telnet.el
parenta849b6b13e6f4534f3b8653db0bb9ba772ae8a70 (diff)
downloademacs-9f2d25e54dbf7b3c3a7fbe4c3c3415f8e3e6f65f.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 "*"))