Mercurial > emacs
changeset 111909:b803b3170809
Trivial fixes for epg.el.
* epg.el (epg-digest-algorithm-alist): Replace "RMD160" with
"RIPEMD160" (Bug#7490). Reported by Daniel Kahn Gillmor.
(epg-context-set-passphrase-callback): Mention that the callback
is not called when used with GnuPG 2.x.
modified:
lisp/ChangeLog
lisp/epg.elk
author | Daiki Ueno <ueno@unixuser.org> |
---|---|
date | Sun, 05 Dec 2010 10:30:58 +0900 |
parents | f076312ff320 |
children | 662b605247a4 7cf6b779fb96 |
files | lisp/ChangeLog lisp/epg.el |
diffstat | 2 files changed, 15 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sat Dec 04 20:16:01 2010 -0500 +++ b/lisp/ChangeLog Sun Dec 05 10:30:58 2010 +0900 @@ -33,6 +33,13 @@ * files.el (file-relative-name): Handle UNC file names on DOS/Windows. (Bug#4674) +2010-12-03 Daiki Ueno <ueno@unixuser.org> + + * epg.el (epg-digest-algorithm-alist): Replace "RMD160" with + "RIPEMD160" (Bug#7490). Reported by Daniel Kahn Gillmor. + (epg-context-set-passphrase-callback): Mention that the callback + is not called when used with GnuPG 2.x. + 2010-12-02 Glenn Morris <rgm@gnu.org> * ps-print.el (ps-line-lengths-internal, ps-nb-pages):
--- a/lisp/epg.el Sat Dec 04 20:16:01 2010 -0500 +++ b/lisp/epg.el Sun Dec 05 10:30:58 2010 +0900 @@ -66,7 +66,7 @@ (defconst epg-digest-algorithm-alist '((1 . "MD5") (2 . "SHA1") - (3 . "RMD160") + (3 . "RIPEMD160") (8 . "SHA256") (9 . "SHA384") (10 . "SHA512") @@ -335,7 +335,13 @@ car is a function and cdr is a callback data. The function gets three arguments: the context, the key-id in -question, and the callback data (if any)." +question, and the callback data (if any). + +The callback may not be called if you use GnuPG 2.x, which relies +on the external program called `gpg-agent' for passphrase query. +If you really want to intercept passphrase query, consider +installing GnuPG 1.x _along with_ GnuPG 2.x, which does passphrase +query by itself and Emacs can intercept them." (unless (eq (car-safe context) 'epg-context) (signal 'wrong-type-argument (list 'epg-context-p context))) (aset (cdr context) 7 (if (consp passphrase-callback)