aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDaiki Ueno2010-12-03 10:52:43 +0900
committerDaiki Ueno2010-12-03 10:52:43 +0900
commit3721e1246a7d23f47976b842c2dc56dc99a103fc (patch)
treee8469d4486b4f764a0a0ddf43ea2eae214589359
parent106c1842eac062877c07844250cea2948d155d17 (diff)
downloademacs-3721e1246a7d23f47976b842c2dc56dc99a103fc.tar.gz
emacs-3721e1246a7d23f47976b842c2dc56dc99a103fc.zip
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.
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/epg.el10
2 files changed, 15 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 97bf1606ac7..086c6a34122 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
12010-12-03 Daiki Ueno <ueno@unixuser.org>
2
3 * epg.el (epg-digest-algorithm-alist): Replace "RMD160" with
4 "RIPEMD160" (Bug#7490). Reported by Daniel Kahn Gillmor.
5 (epg-context-set-passphrase-callback): Mention that the callback
6 is not called when used with GnuPG 2.x.
7
12010-12-02 Michael Albinus <michael.albinus@gmx.de> 82010-12-02 Michael Albinus <michael.albinus@gmx.de>
2 9
3 * net/tramp.el (tramp-local-host-regexp): Add "localhost6". 10 * net/tramp.el (tramp-local-host-regexp): Add "localhost6".
diff --git a/lisp/epg.el b/lisp/epg.el
index fae896c4ae0..a1541361b4b 100644
--- a/lisp/epg.el
+++ b/lisp/epg.el
@@ -67,7 +67,7 @@
67(defconst epg-digest-algorithm-alist 67(defconst epg-digest-algorithm-alist
68 '((1 . "MD5") 68 '((1 . "MD5")
69 (2 . "SHA1") 69 (2 . "SHA1")
70 (3 . "RMD160") 70 (3 . "RIPEMD160")
71 (8 . "SHA256") 71 (8 . "SHA256")
72 (9 . "SHA384") 72 (9 . "SHA384")
73 (10 . "SHA512") 73 (10 . "SHA512")
@@ -337,7 +337,13 @@ PASSPHRASE-CALLBACK is either a function, or a cons-cell whose
337car is a function and cdr is a callback data. 337car is a function and cdr is a callback data.
338 338
339The function gets three arguments: the context, the key-id in 339The function gets three arguments: the context, the key-id in
340question, and the callback data (if any)." 340question, and the callback data (if any).
341
342The callback may not be called if you use GnuPG 2.x, which relies
343on the external program called `gpg-agent' for passphrase query.
344If you really want to intercept passphrase query, consider
345installing GnuPG 1.x _along with_ GnuPG 2.x, which does passphrase
346query by itself and Emacs can intercept them."
341 (unless (eq (car-safe context) 'epg-context) 347 (unless (eq (car-safe context) 'epg-context)
342 (signal 'wrong-type-argument (list 'epg-context-p context))) 348 (signal 'wrong-type-argument (list 'epg-context-p context)))
343 (aset (cdr context) 7 (if (consp passphrase-callback) 349 (aset (cdr context) 7 (if (consp passphrase-callback)