diff options
| author | Yuri D'Elia | 2017-01-28 15:20:54 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2017-01-28 15:21:28 +0100 |
| commit | f83363d30e1c78c228e57fe1a5e9ad8faf89f238 (patch) | |
| tree | fa3ea2a73f34d8927fe7d581bd178f843168b37d | |
| parent | 375c70fd9ef024f1a8ac99604e89c9991ac69eea (diff) | |
| download | emacs-f83363d30e1c78c228e57fe1a5e9ad8faf89f238.tar.gz emacs-f83363d30e1c78c228e57fe1a5e9ad8faf89f238.zip | |
Subject: Check Bcc after the Messag hook has run
* lisp/gnus/message.el (message-send): If the hook modifies
the message (mml tags or headers), we should check bcc on the
final message, not on the original.
| -rw-r--r-- | lisp/gnus/message.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 4f08b0b2725..ce0dad9cb05 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el | |||
| @@ -4119,8 +4119,8 @@ It should typically alter the sending method in some way or other." | |||
| 4119 | (let ((inhibit-read-only t)) | 4119 | (let ((inhibit-read-only t)) |
| 4120 | (put-text-property (point-min) (point-max) 'read-only nil)) | 4120 | (put-text-property (point-min) (point-max) 'read-only nil)) |
| 4121 | (message-fix-before-sending) | 4121 | (message-fix-before-sending) |
| 4122 | (mml-secure-bcc-is-safe) | ||
| 4123 | (run-hooks 'message-send-hook) | 4122 | (run-hooks 'message-send-hook) |
| 4123 | (mml-secure-bcc-is-safe) | ||
| 4124 | (when message-confirm-send | 4124 | (when message-confirm-send |
| 4125 | (or (y-or-n-p "Send message? ") | 4125 | (or (y-or-n-p "Send message? ") |
| 4126 | (keyboard-quit))) | 4126 | (keyboard-quit))) |