[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#18718: acknowledged by developer (control message for bug #18718)
From: |
Jens Lechtenboerger |
Subject: |
bug#18718: acknowledged by developer (control message for bug #18718) |
Date: |
Sun, 03 Jan 2016 15:57:35 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/25.1.50 (gnu/linux) |
On 2016-01-03, at 10:08, Lars Magne Ingebrigtsen wrote:
> Calling from message-send sounds better, I think. Could you send a
> patch?
This should do it.
>From c1cae98181cb05a001a4b0b3216f4aa072aaed6c Mon Sep 17 00:00:00 2001
From: Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
Date: Sun, 3 Jan 2016 15:48:43 +0100
Subject: [PATCH] Call mml-secure-bcc-is-safe for bug#18718
* lisp/gnus/message.el (message-send): Call mml-secure-bcc-is-safe
---
lisp/gnus/message.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index a6c8282..1e2e3bd 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -4227,6 +4227,8 @@ Instead, just auto-save the buffer and then bury it."
(if message-return-action
(apply (car message-return-action) (cdr message-return-action))))
+(autoload 'mml-secure-bcc-is-safe "mml-sec")
+
(defun message-send (&optional arg)
"Send the message in the current buffer.
If `message-interactive' is non-nil, wait for success indication or
@@ -4241,6 +4243,7 @@ It should typically alter the sending method in some way
or other."
(let ((inhibit-read-only t))
(put-text-property (point-min) (point-max) 'read-only nil))
(message-fix-before-sending)
+ (mml-secure-bcc-is-safe)
(run-hooks 'message-send-hook)
(when message-confirm-send
(or (y-or-n-p "Send message? ")
--
1.9.1