diff options
Diffstat (limited to 'lisp')
| -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 @@ | |||
| 1 | 2010-10-26 Daiki Ueno <ueno@unixuser.org> | ||
| 2 | |||
| 3 | * epa-mail.el (epa-mail-encrypt): Handle local-part only | ||
| 4 | recipients (Bug#7280). | ||
| 5 | |||
| 1 | 2010-10-25 Glenn Morris <rgm@gnu.org> | 6 | 2010-10-25 Glenn Morris <rgm@gnu.org> |
| 2 | 7 | ||
| 3 | * term/common-win.el (x-handle-switch): Simplify with pop. | 8 | * 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. " | |||
| 154 | (epa-mail--find-usable-key | 154 | (epa-mail--find-usable-key |
| 155 | (epg-list-keys | 155 | (epg-list-keys |
| 156 | (epg-make-context epa-protocol) | 156 | (epg-make-context epa-protocol) |
| 157 | (concat "<" recipient ">")) | 157 | (if (string-match "@" recipient) |
| 158 | (concat "<" recipient ">") | ||
| 159 | recipient)) | ||
| 158 | 'encrypt)) | 160 | 'encrypt)) |
| 159 | (unless (or recipient-key | 161 | (unless (or recipient-key |
| 160 | (y-or-n-p | 162 | (y-or-n-p |