(delete-region start end)
(goto-char start)
(insert plain))
- (let ((epa-popup-info-window t))
- (epa-display-info plain)))
+ (with-output-to-temp-buffer "*Text*"
+ (set-buffer standard-output)
+ (insert plain)))
(if (epg-context-result-for context 'verify)
(epa-display-info (epg-verify-result-to-string
(epg-context-result-for context 'verify)))))))