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