From 62321e4c9b7d9346fd07a1a0dd5c97e6fea160e5 Mon Sep 17 00:00:00 2001 From: okada Date: Sun, 26 Nov 2000 10:45:50 +0000 Subject: [PATCH] * elmo-nntp.el (elmo-network-initialize-session): Accept response 20[01]. --- elmo/ChangeLog | 4 ++++ elmo/elmo-nntp.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index ac02853..bd18055 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,7 @@ +2000-11-26 Kenichi OKADA + + * elmo-nntp.el (elmo-network-initialize-session): Accept response 20[01]. + 2000-11-24 Kenichi OKADA * elmo-nntp.el (elmo-network-initialize-session): omitted. diff --git a/elmo/elmo-nntp.el b/elmo/elmo-nntp.el index 8b925a8..f8a18ea 100644 --- a/elmo/elmo-nntp.el +++ b/elmo/elmo-nntp.el @@ -190,7 +190,7 @@ Don't cache if nil.") (while (and (memq (process-status process) '(open run)) (goto-char (point-max)) (forward-line -1) - (not (looking-at "200"))) + (not (looking-at "20[01]"))) (accept-process-output process 1)) (setq elmo-nntp-read-point (point)) (or (elmo-nntp-read-response session t) -- 1.7.10.4