(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)