diff options
| author | Daiki Ueno <ueno@unixuser.org> | 2010-10-26 10:02:08 +0900 |
|---|---|---|
| committer | Daiki Ueno <ueno@unixuser.org> | 2010-10-26 10:02:08 +0900 |
| commit | 77ec02d8fdf1da79e1774dc6e20dedabd065bbe9 (patch) | |
| tree | 0530c59a5dd8f048b8c24aa5d84c982e898315f3 /lisp/epa-mail.el | |
| parent | 84acb2f67b04b038a5d6ca8637e4219c2713284d (diff) | |
| download | emacs-77ec02d8fdf1da79e1774dc6e20dedabd065bbe9.tar.gz | |
Make epa-mail-encrypt handle local-part only recipients.
* epa-mail.el (epa-mail-encrypt): Handle local-part only
recipients (Bug#7280).
Diffstat (limited to 'lisp/epa-mail.el')
| -rw-r--r-- | lisp/epa-mail.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/epa-mail.el b/lisp/epa-mail.el index 09b30868115..2b29e80daa5 100644 --- a/lisp/epa-mail.el +++ b/lisp/epa-mail.el @@ -154,7 +154,9 @@ If no one is selected, symmetric encryption will be performed. " (epa-mail--find-usable-key (epg-list-keys (epg-make-context epa-protocol) - (concat "<" recipient ">")) + (if (string-match "@" recipient) + (concat "<" recipient ">") + recipient)) 'encrypt)) (unless (or recipient-key (y-or-n-p |