From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Wed, 27 Nov 2019 11:44:58 +0000 (+0100)
Subject: Make message-allow-no-recipients 'always work
X-Git-Tag: emacs-27.0.90~508
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fd63880540bc8853a709e5a52c2565301a3d74eb;p=emacs.git

Make message-allow-no-recipients 'always work

* lisp/gnus/message.el (message-send): Make
message-allow-no-recipients 'always work.
---

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index c66b551c1e4..f33454e7047 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -4247,9 +4247,9 @@ It should typically alter the sending method in some way or other."
 		(let ((fcc (message-fetch-field "Fcc"))
 		      (gcc (message-fetch-field "Gcc")))
 		  (when (or fcc gcc)
-		    (or (eq message-allow-no-recipients 'always)
-			(and (not (eq message-allow-no-recipients 'never))
-			     (setq dont-barf-on-no-method
+		    (setq dont-barf-on-no-method
+			  (or (eq message-allow-no-recipients 'always)
+			      (and (not (eq message-allow-no-recipients 'never))
 				   (y-or-n-p
 				    (format "No receiver, perform %s anyway? "
 					    (cond ((and fcc gcc) "Fcc and Gcc")