diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-03-13 05:29:11 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-03-13 05:29:11 +0000 |
| commit | dd7486f3ddc0a951bf87e927e30513651b4ab2b2 (patch) | |
| tree | dddd4be540d78c78805ce64be6ff5eee16cefe6a /lisp/telnet.el | |
| parent | 0053e7d4c599dcff859489cc5d575c4d98b79686 (diff) | |
| download | emacs-dd7486f3ddc0a951bf87e927e30513651b4ab2b2.tar.gz | |
(rsh): Name the buffer *rsh-HOST*.
Diffstat (limited to 'lisp/telnet.el')
| -rw-r--r-- | lisp/telnet.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/telnet.el b/lisp/telnet.el index 3bcf803ff4e..0be43dc80b7 100644 --- a/lisp/telnet.el +++ b/lisp/telnet.el @@ -216,16 +216,16 @@ Data is sent to the remote host when RET is typed. (use-local-map telnet-mode-map) (run-hooks 'telnet-mode-hook)) -;;;###autoload (add-hook 'same-window-regexps "\\*[^-]*-rsh\\*\\(\\|<[0-9]*>\\)") +;;;###autoload (add-hook 'same-window-regexps "\\*rsh-[^-]*\\*\\(\\|<[0-9]*>\\)") ;;;###autoload (defun rsh (host) "Open a network login connection to host named HOST (a string). -Communication with HOST is recorded in a buffer `*HOST-rsh*'. +Communication with HOST is recorded in a buffer `*rsh-HOST*'. Normally input is edited in Emacs and sent a line at a time." (interactive "sOpen rsh connection to host: ") (require 'shell) - (let ((name (concat host "-rsh" ))) + (let ((name (concat "rsh-" host ))) (pop-to-buffer (make-comint name remote-shell-program nil host)) (set-process-filter (get-process name) 'telnet-initial-filter) (telnet-mode) |