From: okada <okada>
Date: Fri, 27 Jul 2001 18:27:43 +0000 (+0000)
Subject: 	* elmo-nntp.el (elmo-network-initialize-session): Call
X-Git-Tag: wl-2_6_1~48
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=eb47950dfed6c3db7e886ac65ba6044a9e05c939;p=elisp%2Fwanderlust.git

	* elmo-nntp.el (elmo-network-initialize-session): Call
	`elmo-nntp-send-mode-reader'.
	(elmo-network-setup-session): Remove `elmo-nntp-send-mode-reader'.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 6329473..1e03aeb 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,9 @@
+2001-07-28  Kenichi OKADA  <okada@opaopa.org>
+
+	* elmo-nntp.el (elmo-network-initialize-session): Call
+	`elmo-nntp-send-mode-reader'.
+	(elmo-network-setup-session): Remove `elmo-nntp-send-mode-reader'.
+
 2001-07-25  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* elmo-archive.el (elmo-archive-get-archive-name): Cause an error when
diff --git a/elmo/elmo-nntp.el b/elmo/elmo-nntp.el
index c4ed392..634766d 100644
--- a/elmo/elmo-nntp.el
+++ b/elmo/elmo-nntp.el
@@ -193,6 +193,8 @@ Don't cache if nil.")
       (setq elmo-nntp-read-point (point))
       (or (elmo-nntp-read-response session t)
 	  (error "Cannot open network"))
+      (if elmo-nntp-send-mode-reader
+	  (elmo-nntp-send-mode-reader session))
       (when (eq (elmo-network-stream-type-symbol
 		 (elmo-network-session-stream-type-internal session))
 		'starttls)
@@ -220,8 +222,6 @@ Don't cache if nil.")
 
 (luna-define-method elmo-network-setup-session ((session
 						 elmo-nntp-session))
-  (if elmo-nntp-send-mode-reader
-      (elmo-nntp-send-mode-reader session))
   (run-hooks 'elmo-nntp-opened-hook))
 
 (defun elmo-nntp-process-filter (process output)