Mercurial > hg > xemacs-beta

diff lisp/comint/telnet.el @ 78:c7528f8e288d r20-0b34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b34
author cvs
date Mon, 13 Aug 2007 09:05:42 +0200
parents 54cc21c15cbb
children 1ce6082ce73f
line wrap: on
line diff
--- a/lisp/comint/telnet.el	Mon Aug 13 09:05:11 2007 +0200
+++ b/lisp/comint/telnet.el	Mon Aug 13 09:05:42 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)