nndraft.el (nndraft-update-unread-articles): Don't send delayed articles.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 660bc8966e77e0e292291e07f8e5122c71f83973..04ba929e392d1a4a60f72e2ff9171466761523c3 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2011-08-17  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * nndraft.el (nndraft-update-unread-articles): Don't send delayed
+       articles.
+
 2011-08-13  Andreas Schwab  <schwab@linux-m68k.org>
 
        * gnus-score.el (gnus-all-score-files): Use copy-sequence instead of

diff --git a/lisp/gnus/nndraft.el b/lisp/gnus/nndraft.el
index f528222dd1662e7c8201b937e09706714d78def2..0b47062a919384fa4998042d07ffa8d836f9011e 100644 (file)
--- a/lisp/gnus/nndraft.el
+++ b/lisp/gnus/nndraft.el
@@ -177,6 +177,8 @@ are generated if and only if they are also in `message-draft-headers'.")
                                                       (list 'nndraft "")))
                           (nnmail-get-active)))
           (gnus-group-marked (copy-sequence groups))
+          ;; Don't send delayed articles.
+          (gnus-get-new-news-hook nil)
           (inhibit-read-only t))
       (gnus-group-get-new-news-this-group nil t)
       (dolist (group groups)