Mercurial > hg > xemacs-beta

diff lisp/comint/telnet.el @ 12:bcdc7deadc19 r19-15b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b7
author cvs
date Mon, 13 Aug 2007 08:48:16 +0200
parents 4b173ad71786
children 9ee227acff29
line wrap: on
line diff
--- a/lisp/comint/telnet.el	Mon Aug 13 08:47:56 2007 +0200
+++ b/lisp/comint/telnet.el	Mon Aug 13 08:48:16 2007 +0200
@@ -126,9 +126,7 @@
 	  ((string-match "its" string)
 	   (setq telnet-prompt-pattern  "^[^*>\n]*[*>] *"))
 	  ((string-match "explorer" string) ;;explorer telnet needs work
-	   (setq telnet-replace-c-g ?\n))
-	  (t
-	   (setq telnet-prompt-pattern telnet-default-prompt-pattern))))
+	   (setq telnet-replace-c-g ?\n))))
   (setq comint-prompt-regexp telnet-prompt-pattern))
 
 (defun telnet-initial-filter (proc string)