From: ueno <ueno>
Date: Tue, 30 Jan 2007 05:44:36 +0000 (+0000)
Subject: Fixed prompt.
X-Git-Tag: plaintext-branchpoint~21
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=daf7cbc449439c52cddbc869471efe7753d92157;p=elisp%2Fepg.git

Fixed prompt.
---

diff --git a/epg.el b/epg.el
index 79a03c6..880db02 100644
--- a/epg.el
+++ b/epg.el
@@ -1265,11 +1265,13 @@ 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)
-  (if (and (equal (car epg-last-status) "USERID_HINT")
-	   (string-match "\\`\\([^ ]+\\) \\(.*\\)" (cdr epg-last-status)))
-      (y-or-n-p (format "Untrusted key %s %s.  Trust this key anyway? "
-			(match-string 1 string)
-			(match-string 2 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? ")))
 
 (defun epg--status-GET_BOOL (context string)
   (let (inhibit-quit)