From xemacs-m  Thu Jan 16 05:45:29 1997
Received: from ias1.iacnet.com (ias1.iacnet.com [140.244.1.69])
          by xemacs.org (8.8.4/8.8.4) with ESMTP
	  id FAA27602 for <xemacs-beta@xemacs.org>; Thu, 16 Jan 1997 05:45:28 -0600 (CST)
Received: from jet-sun.med.iacnet.com by ias1.iacnet.com (PMDF V5.0-5 #16455)
 id <01IE9SBRVTCG00LAX8@ias1.iacnet.com> for xemacs-beta@xemacs.org; Thu,
 16 Jan 1997 06:45:29 -0500 (EST)
Received: by jet-sun.med.iacnet.com (SMI-8.6/SMI-SVR4) id GAA00400; Thu,
 16 Jan 1997 06:45:47 -0500
Date: Thu, 16 Jan 1997 06:45:47 -0500
From: andreas@sccon.com
Subject: Re: telnet
In-reply-to: <m2oher3cg6.fsf@altair.xemacs.org>
To: Steven L Baur <steve@miranova.com>
Cc: xemacs-beta@xemacs.org
Message-id: <199701161145.GAA00400@jet-sun.med.iacnet.com>
Content-transfer-encoding: 7BIT
References: <199701141318.HAA02192@mharnois.workgroup.net>
 <m2oher3cg6.fsf@altair.xemacs.org>

>>>>> "steve" == Steven L Baur <steve@miranova.com> writes:

    steve> Michael Harnois writes:
    >> sorry to say, telnet is not behaving any differently for me
    >> under 20.0-beta90 ...

    steve> I found some more lurking obscure braindamage.  Try this:

    steve> (NOTE: Patch is against 19.15, but should work against
    steve> 20.0).

sorry that i am just getting to this... but IT WORKS... i have telnetted
all over the place and it exhibits the same behavior as emacs-19.34...
don't know if that is a good thing or a bad thing...

thought you could use some good news though...

now if only there were an ssh.el... :)

cheers,
andreas
--
Steller Computer Consultants	      Andreas Kaempf
       P.O. BOX 3873		       603-595-7461
   Nashua, NH 03062  USA	    andreas@sccon.com
.....................................................
Fragen Sie nicht, was Ihr Computer fuer Sie tun kann.
Fragen Sie, was Sie fuer Ihren Computer tun koennen.




    steve> Index: telnet.el
    steve> ===================================================================
    steve> RCS file:
    steve> /usr/local/xemacs/xemacs-19.15/lisp/comint/telnet.el,v
    steve> retrieving revision 1.4 diff -u -r1.4 telnet.el ---
    steve> telnet.el 1997/01/11 22:10:02 1.4 +++ telnet.el 1997/01/15
    steve> 02:18:32 @@ -68,7 +68,7 @@ (defvar telnet-count 0 "Number
    steve> of output strings read from the telnet process while
    steve> looking for the initial password.")
    steve> -(make-variable-buffer-local 'telnet-count) +;;
    steve> (make-variable-buffer-local 'telnet-count)
 
    steve>  (defvar telnet-program "telnet" "Program to run to open a
    steve> telnet connection.")  @@ -254,7 +254,6 @@ (if port (concat
    steve> " " port) "") "\n")) (setq comint-input-sender
    steve> 'telnet-simple-send) - (setq telnet-count
    steve> telnet-initial-count) ;; run last so that hooks can change
    steve> things.  (telnet-mode))))
 
    steve> @@ -273,6 +272,7 @@ mode-name "Telnet" comint-prompt-regexp
    steve> telnet-prompt-pattern) (use-local-map telnet-mode-map) +
    steve> (set (make-variable-buffer-local 'telnet-count)
    steve> telnet-initial-count) (run-hooks 'telnet-mode-hook))
 
    steve>  ;;;###autoload (add-hook 'same-window-regexps
    steve> "\\*rsh-[^-]*\\*\\(\\|<[0-9]*>\\)") @@ -288,7 +288,6 @@
    steve> (require 'shell) (let ((name (concat "rsh-" host)))
    steve> (pop-to-buffer (make-comint name remote-shell-program nil
    steve> host)) - (setq telnet-count telnet-initial-count) ;; ;;
    steve> SunOS doesn't print "unix" in its rsh login banner, so
    steve> let's get a ;; reasonable default here.  There do exist
    steve> non-Unix machines which @@ -303,8 +302,10 @@ ;; antisocial
    steve> than echoing a password, and more likely than connecting ;;
    steve> to a non-Unix rsh host these days...  ;; - ;;
    steve> (set-process-filter (get-process name)
    steve> 'telnet-initial-filter) - (set-process-filter (get-process
    steve> name) 'telnet-filter) + ;; I disagree with the above.  -sb
    steve> + ;; + (set-process-filter (get-process name)
    steve> 'telnet-initial-filter) + ;; (set-process-filter
    steve> (get-process name) 'telnet-filter) ;; run last so that
    steve> hooks can change things.  (telnet-mode)))
 



