Mercurial > emacs
changeset 93002:d876f5372472
EasyPG: Fix bug with C-x C-s after M-x epa-file-select-keys.
| author | Michael Olson <mwolson@gnu.org> |
|---|---|
| date | Sun, 16 Mar 2008 04:04:15 +0000 |
| parents | 6c85b8971fe3 |
| children | d22a1707eab3 |
| files | lisp/epa-file.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/epa-file.el Sun Mar 16 01:58:15 2008 +0000 +++ b/lisp/epa-file.el Sun Mar 16 04:04:15 2008 +0000 @@ -285,10 +285,13 @@ (interactive) (make-local-variable 'epa-file-encrypt-to) (setq epa-file-encrypt-to + (mapcar + (lambda (key) + (epg-sub-key-id (car (epg-key-sub-key-list key)))) (epa-select-keys (epg-make-context) "Select recipents for encryption. -If no one is selected, symmetric encryption will be performed. "))) +If no one is selected, symmetric encryption will be performed. ")))) ;;;###autoload (defun epa-file-enable ()