From: yamaoka <yamaoka>
Date: Mon, 28 Sep 1998 12:35:11 +0000 (+0000)
Subject: 1998-09-28  Tatsuya Ichikawa  <t-ichi@po.shiojiri.ne.jp>
X-Git-Tag: pgnus-ichikawa-199811302358~202
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bc18cfe81920a42560633c3ca94ceec55bf24782;p=elisp%2Fgnus.git-

1998-09-28  Tatsuya Ichikawa  <t-ichi@po.shiojiri.ne.jp>

	* lisp/nnmh.el (nnmh-request-accept-article): Insert `Message-ID'
	only if `group' name is neither "queue" nor "draft".
---

diff --git a/ChangeLog b/ChangeLog
index 8944e4d..1c7cd7f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1998-09-28  Tatsuya Ichikawa  <t-ichi@po.shiojiri.ne.jp>
+
+	* lisp/nnmh.el (nnmh-request-accept-article): Insert `Message-ID'
+	only if `group' name is neither "queue" nor "draft".
+
 1998-09-26  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* texi/gnus-ja.texi: Sync up with Semi-gnus 6.8.19.
diff --git a/lisp/nnmh.el b/lisp/nnmh.el
index 6dcdb5d..2c4dd68 100644
--- a/lisp/nnmh.el
+++ b/lisp/nnmh.el
@@ -294,7 +294,9 @@
 
 (deffoo nnmh-request-accept-article (group &optional server last noinsert)
   (nnmh-possibly-change-directory group server)
-  (nnmail-check-syntax)
+  (if (or (not (equal group "queue"))
+	  (not (equal group "draft")))
+      (nnmail-check-syntax))
   (when nnmail-cache-accepted-message-ids
     (nnmail-cache-insert (nnmail-fetch-field "message-id")))
   (nnheader-init-server-buffer)