From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 18 Sep 1994 18:16:20 +0000 (+0000)
Subject: (telnet): Use name *telnet-HOST*, not *HOST-telnet*.
X-Git-Tag: emacs-19.34~6978
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e14e9e26e413f3c79120c016270eec82437a234d;p=emacs.git

(telnet): Use name *telnet-HOST*, not *HOST-telnet*.
---

diff --git a/lisp/telnet.el b/lisp/telnet.el
index 6697667ed18..28884e11cd4 100644
--- a/lisp/telnet.el
+++ b/lisp/telnet.el
@@ -182,11 +182,11 @@ rejecting one login and prompting again for a username and password.")
 ;;;###autoload
 (defun telnet (host)
   "Open a network login connection to host named HOST (a string).
-Communication with HOST is recorded in a buffer *HOST-telnet*.
+Communication with HOST is recorded in a buffer `*telnet-HOST*'.
 Normally input is edited in Emacs and sent a line at a time."
   (interactive "sOpen telnet connection to host: ")
   (let* ((comint-delimiter-argument-list '(?\  ?\t))
-         (name (concat (comint-arguments host 0 nil) "-telnet" ))
+         (name (concat "telnet-" (comint-arguments host 0 nil) ))
 	 (buffer (get-buffer (concat "*" name "*"))))
     (if (and buffer (get-buffer-process buffer))
 	(switch-to-buffer (concat "*" name "*"))