projects
/
elisp
/
epg.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
6d04b43
)
Fixed.
author
ueno
<ueno>
Thu, 26 Apr 2007 06:30:54 +0000
(06:30 +0000)
committer
ueno
<ueno>
Thu, 26 Apr 2007 06:30:54 +0000
(06:30 +0000)
epg.el
patch
|
blob
|
history
diff --git
a/epg.el
b/epg.el
index
7762285
..
29a8ee5
100644
(file)
--- a/
epg.el
+++ b/
epg.el
@@
-1292,9
+1292,10
@@
This function is for internal use only."
(defun epg--prompt-GET_BOOL-untrusted_key.override (context string)
(y-or-n-p (if (and (equal (car epg-last-status) "USERID_HINT")
(defun epg--prompt-GET_BOOL-untrusted_key.override (context string)
(y-or-n-p (if (and (equal (car epg-last-status) "USERID_HINT")
- (string-match "\\`\\([^ ]+\\) \\(.*\\)" string))
- (let* ((key-id (match-string 1 string))
- (user-id (match-string 2 string))
+ (string-match "\\`\\([^ ]+\\) \\(.*\\)"
+ (cdr epg-last-status)))
+ (let* ((key-id (match-string 1 (cdr epg-last-status)))
+ (user-id (match-string 2 (cdr epg-last-status)))
(entry (assoc key-id epg-user-id-alist)))
(if entry
(setq user-id (cdr entry)))
(entry (assoc key-id epg-user-id-alist)))
(if entry
(setq user-id (cdr entry)))