mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-06 07:31:13 -08:00
Code Issues Projects Releases Wiki Activity

EasyPG: Fix bug with C-x C-s after M-x epa-file-select-keys.

Browse source
This commit is contained in:
Michael Olson 2008-03-16 04:04:15 +00:00
parent 2112d731b8
commit fef7aa9ec6
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/epa-file.el
View file

@ -285,10 +285,13 @@ If no one is selected, symmetric encryption will be performed. "
(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 ()