[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#7797: Configure the use of from header for epg signing.
From: |
Daniel Dehennin |
Subject: |
bug#7797: Configure the use of from header for epg signing. |
Date: |
Sun, 16 Jan 2011 21:52:03 +0100 |
User-agent: |
Gnus/5.110011 (No Gnus v0.11) Emacs/24.0.50 (gnu/linux) |
Here is a fixed patch.
Regards.
* lisp/mml2015.el (mml2015-use-from-address): New variable for optional
from header use.
(mml2015-epg-sign): Use it.
(mml2015-epg-encrypt): Ditto.
---
lisp/mml2015.el | 12 ++++++++++--
1 files changed, 10 insertions(+), 2 deletions(-)
diff --git a/lisp/mml2015.el b/lisp/mml2015.el
index 9831b33..762eb95 100644
--- a/lisp/mml2015.el
+++ b/lisp/mml2015.el
@@ -121,6 +121,12 @@ Whether the passphrase is cached at all is controlled by
:group 'mime-security
:type '(repeat (string :tag "Key ID")))
+(defcustom mml2015-use-from-address nil
+ "If t, use from header mail address before mml2015-signers when
+signing."
+ :group 'mime-security
+ :type 'boolean)
+
(defcustom mml2015-encrypt-to-self nil
"If t, add your own key ID to recipient list when encryption."
:group 'mime-security
@@ -960,7 +966,8 @@ Whether the passphrase is cached at all is controlled by
(let* ((inhibit-redisplay t)
(context (epg-make-context))
(boundary (mml-compute-boundary cont))
- (sender (message-options-get 'message-sender))
+ (sender (if mml2015-use-from-address
+ (message-options-get 'message-sender)))
signer-key
(signers
(or (message-options-get 'mml2015-epg-signers)
@@ -1035,7 +1042,8 @@ If no one is selected, default secret key is used. "
(let ((inhibit-redisplay t)
(context (epg-make-context))
(config (epg-configuration))
- (sender (message-options-get 'message-sender))
+ (sender (if mml2015-use-from-address
+ (message-options-get 'message-sender)))
(recipients (message-options-get 'mml2015-epg-recipients))
cipher signers
(boundary (mml-compute-boundary cont))
--
1.7.2.3
--
Daniel Dehennin
Récupérer ma clef GPG:
gpg --keyserver pgp.mit.edu --recv-keys 0x6A2540D1
pgpBOY5dR1zYz.pgp
Description: PGP signature
- bug#7797: 24.0.50; [EasyPG/Gnus] always pick up the first key from `gpg --list-key $SENDER`, Luca Capello, 2011/01/06
- bug#7797: 24.0.50; [EasyPG/Gnus] always pick up the first key from `gpg --list-key $SENDER`, Daiki Ueno, 2011/01/06
- bug#7797: 24.0.50; [EasyPG/Gnus] always pick up the first key from `gpg --list-key $SENDER`, Daiki Ueno, 2011/01/07
- bug#7797: 24.0.50; [EasyPG/Gnus] always pick up the first key from `gpg --list-key $SENDER`, Luca Capello, 2011/01/07
- bug#7797: 24.0.50; [EasyPG/Gnus] always pick up the first key from `gpg --list-key $SENDER`, Daiki Ueno, 2011/01/07
- bug#7797: Configure the use of from header for epg signing., Daniel Dehennin, 2011/01/07
- bug#7797: Configure the use of from header for epg signing.,
Daniel Dehennin <=
- bug#7797: Configure the use of from header for epg signing., Lars Ingebrigtsen, 2011/01/22
- bug#7797: Configure the use of from header for epg signing., Daiki Ueno, 2011/01/23
- bug#7797: Configure the use of from header for epg signing., Julien Danjou, 2011/01/27
- bug#7797: Configure the use of from header for epg signing., Daiki Ueno, 2011/01/28
- bug#7797: Configure the use of from header for epg signing., Luca Capello, 2011/01/16