Mercurial > emacs

diff lisp/epa-mail.el @ 111181:6585f38b9f1d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make epa-mail-encrypt handle local-part only recipients. * epa-mail.el (epa-mail-encrypt): Handle local-part only recipients (Bug#7280).
author Daiki Ueno <ueno@unixuser.org>
date Tue, 26 Oct 2010 10:02:08 +0900
parents 280c8ae2476d
children d6dad5b04eb8
line wrap: on
line diff
--- a/lisp/epa-mail.el	Mon Oct 25 22:02:00 2010 +0000
+++ b/lisp/epa-mail.el	Tue Oct 26 10:02:08 2010 +0900
@@ -154,7 +154,9 @@
 			    (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