X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=epg.el;h=330e7c46926c58c809d3bb1d6de8d2b1b20a02ba;hb=b1d05ceee17137266c8a4729bb0180fe265baae4;hp=ca9b4c686cd743c4cc212a4894c25e679d069952;hpb=d1288b1e0e9488665d7a2e92fadfcb249f250dc7;p=elisp%2Fepg.git

diff --git a/epg.el b/epg.el
index ca9b4c6..330e7c4 100644
--- a/epg.el
+++ b/epg.el
@@ -260,7 +260,8 @@ This function is for internal use only."
 
 (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
@@ -595,9 +596,7 @@ If you are unsure, use synchronous version of this function
 	(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)