From: Richard M. Stallman Date: Tue, 18 Oct 1994 02:45:12 +0000 (+0000) Subject: (nntp-open-server): Send MODE READER command to server. X-Git-Tag: emacs-19.34~6272 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=332ad7ce48d611a232ddd085331b1069637d85a1;p=emacs.git (nntp-open-server): Send MODE READER command to server. --- diff --git a/lisp/nntp.el b/lisp/nntp.el index e72e7efec97..b34c17c7213 100644 --- a/lisp/nntp.el +++ b/lisp/nntp.el @@ -338,8 +338,9 @@ If optional argument SERVICE is non-nil, open by the service name." ;; Do check unexpected close of connection. ;; Suggested by feldmark@hanako.stars.flab.fujitsu.junet. (if status - (set-process-sentinel nntp-server-process - 'nntp-default-sentinel) + (progn (set-process-sentinel nntp-server-process + 'nntp-default-sentinel) + (nntp-send-command "^[25].*\r$" "MODE" "READER")) ;; We have to close connection here, since function ;; `nntp-server-opened' may return incorrect status. (nntp-close-server-internal)