"")))
(defun epg-verify-result-to-string (verify-result)
- (mapconcat #'epg-signature-to-string (reverse verify-result) "\n"))
+ (mapconcat #'epg-signature-to-string verify-result "\n"))
(defun epg-start (context args)
"Start `epg-gpg-program' in a subprocess with given ARGS."
(if (epg-data-file plain)
(list (epg-data-file plain)))))
(if sign
- (epg-wait-for-status context '("BEGIN_SIGNING")))
- (epg-wait-for-status context '("BEGIN_ENCRYPTION"))
+ (epg-wait-for-status context '("BEGIN_SIGNING"))
+ (epg-wait-for-status context '("BEGIN_ENCRYPTION")))
(if (and (epg-data-string plain)
(eq (process-status (epg-context-process context)) 'run))
(process-send-string (epg-context-process context)