(nntp-open-telnet): Wait for the telnet prompt before sending a command;

allow the rtelnet prompt as well.
;; A patch for Gnus has been posted to `nntp+quimby.gnus.org:gnus.gnus-bug'.

diff --git a/lisp/nntp.el b/lisp/nntp.el
index b7919b9..846b61f 100644 (file)
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -1297,6 +1297,7 @@ password contained in '~/.nntp-authinfo'."
                  "nntpd" buffer nntp-telnet-command nntp-telnet-switches)))
          (case-fold-search t))
       (when (memq (process-status proc) '(open run))
+       (nntp-wait-for-string "^r?telnet")
        (process-send-string proc "set escape \^X\n")
        (cond
         ((and nntp-open-telnet-envuser nntp-telnet-user-name)
@@ -1326,7 +1327,7 @@ password contained in '~/.nntp-authinfo'."
        (beginning-of-line)
        (delete-region (point-min) (point))
        (process-send-string proc "\^]")
-       (nntp-wait-for-string "^telnet")
+       (nntp-wait-for-string "^r?telnet")
        (process-send-string proc "mode character\n")
        (accept-process-output proc 1)
        (sit-for 1)