From: ueno Date: Tue, 30 Jan 2007 05:45:18 +0000 (+0000) Subject: Simplified. X-Git-Tag: plaintext-branchpoint~20 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=df93ef075dc4e87e41d38fefa6f06faf72a5a483;p=elisp%2Fepg.git Simplified. --- diff --git a/epg.el b/epg.el index 880db02..7fa6df6 100644 --- a/epg.el +++ b/epg.el @@ -1265,13 +1265,10 @@ This function is for internal use only." (y-or-n-p (if entry (cdr entry) (concat string "? "))))) (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 "\\`\\([^ ]+\\) \\(.*\\)" (cdr epg-last-status))) - (format "Untrusted key %s %s. Use this key anyway? " - (match-string 1 string) - (match-string 2 string)) - "Use this key anyway? "))) + (y-or-n-p (if (equal (car epg-last-status) "USERID_HINT") + (format "Untrusted key %s. Use this key anyway? " + (cdr epg-last-status)) + "Use this key anyway? "))) (defun epg--status-GET_BOOL (context string) (let (inhibit-quit)