diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-10-18 02:45:12 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-10-18 02:45:12 +0000 |
commit | bf9588afd094b2bca2c4386975d447478d0b8784 (patch) | |
tree | 2ff0178dfd0831aee8ceb2893caf7cf6561fda9c /lisp/=nntp.el | |
parent | 876fec05b671fe78d077df2f0ab069ba5197d6d9 (diff) | |
download | emacs-bf9588afd094b2bca2c4386975d447478d0b8784.tar.gz |
(nntp-open-server): Send MODE READER command to server.
Diffstat (limited to 'lisp/=nntp.el')
-rw-r--r-- | lisp/=nntp.el | 5 |
1 files changed, 3 insertions, 2 deletions
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) |