diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/epa-mail.el | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e62729555c2..723bb8d5c1b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-10-26 Daiki Ueno <ueno@unixuser.org> + + * epa-mail.el (epa-mail-encrypt): Handle local-part only + recipients (Bug#7280). + 2010-10-25 Glenn Morris <rgm@gnu.org> * term/common-win.el (x-handle-switch): Simplify with pop. 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 |