(defun epg-read-output (context)
(with-temp-buffer
- (set-buffer-multibyte nil)
+ (if (fboundp 'set-buffer-multibyte)
+ (set-buffer-multibyte nil))
(if (file-exists-p (epg-context-output-file context))
(let ((coding-system-for-read (if (epg-context-textmode context)
'raw-text
(if (epg-context-result-for context 'error)
(error "Decryption failed"))
(epg-read-output context))
- (epg-reset context)
- (if (file-exists-p input-file)
- (delete-file input-file))))
+ (epg-reset context)))
;;;###autoload
(defun epg-decrypt-string (context string)