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

[gnus] / lisp / nndraft.el

diff --git a/lisp/nndraft.el b/lisp/nndraft.el
index f528222..0b47062 100644 (file)
--- a/lisp/nndraft.el
+++ b/lisp/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)