From acevedo@ATHENA.MIT.EDU Sun May 19 19:38:41 1991
From: acevedo@ATHENA.MIT.EDU
Date: Wed, 15 May 91 10:15:37 EDT
To: harelb@cabot.dartmouth.edu
In-Reply-To: Harel Barzilai's message of Sun, 12 May 91 17:30:26 -0400 <9105122130.AA18920@cabot.dartmouth.edu>
Subject: Re: Telnet (Re: Shell mode behaviour)


I looked through telnet.el, and here's the function you should use; this
should replace the definition of `telnet-filter' in telnet.el:

   (defun telnet-filter (proc string)
     (save-excursion
       (set-buffer (process-buffer proc))
       (goto-char (point-max))
       (let ((now (point)))
	 (insert string)
	 (subst-char-in-region now (point) ?\^m ?\ )
	 (and telnet-replace-c-g (subst-char-in-region now (point) ?\^g telnet-replace-c-g)))
       (if (process-mark proc)
	   (set-marker (process-mark proc) (point)))
       (if (and (integer-or-marker-p last-input-start)
		(marker-position last-input-start)
		telnet-remote-echoes)
	   (delete-region last-input-start last-input-end)))
     (if (eq (process-buffer proc)
	     (current-buffer))
	 (progn
	   (goto-char (point-max))
	   (recenter (- (window-height) 2))
	   (end-of-line))))

I only added 2 more lines at the end that move the cursor to the bottom
of the screen after input is received and displayed in the telnet
buffer. 

	Raul


From acevedo@ATHENA.MIT.EDU Sun May 19 19:57:43 1991
From: acevedo@ATHENA.MIT.EDU
Date: Sat, 18 May 91 16:02:08 EDT
To: harelb@cabot.dartmouth.edu
In-Reply-To: Harel Barzilai's message of Fri, 17 May 91 21:30:15 -0400 <9105180130.AA24328@cabot.dartmouth.edu>
Subject: Telnet (Re: Shell mode behaviour)


You can just copy the original telnet.el file, and substitute the
definition of the function `telnet-sentinel' with the one I sent you.
Or, just put the definition I gave you at the end of the `telnet.el'
file.  Then, execute M-x byte-compile-file to make sure you
byte-compile the new version.  That should be all you need.

	Raul