master 67722ab 5/6: Avoid querying in a noninteractive Emacs.

[Richard M. Stallman]

branch: master
commit 67722ab62f9cd0ce81efd628d5a87b8ef350aacc
Author: Richard Stallman <rms@gnu.org>
Commit: Richard Stallman <rms@gnu.org>

    Avoid querying in a noninteractive Emacs.
    
    * lisp/mail/sendmail.el (mail-send): In noninteractive Emacs,
    don't ask about combining header fields.
---
 lisp/mail/sendmail.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index c959634..fee11c0 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -896,8 +896,9 @@ the user from the mailer."
                 (concat "\\(?:[[:space:];,]\\|\\`\\)"
                         (regexp-opt mail-mailing-lists t)
                         "\\(?:[[:space:];,]\\|\\'\\)"))))
-        (mail-combine-fields "To")
-        (mail-combine-fields "Cc")
+        (unless noninteractive
+          (mail-combine-fields "To")
+          (mail-combine-fields "Cc"))
        ;; If there are mailing lists defined
        (when ml
          (save-excursion