From: morioka <morioka>
Date: Sat, 14 Mar 1998 23:24:46 +0000 (+0000)
Subject: (mime-method-to-verify-application/pgp-signature): Use
X-Git-Tag: semi-1_1_0~19
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=819d2a2db06b0c96f9b7358ee3fabd749e3c9693;p=elisp%2Fsemi.git

(mime-method-to-verify-application/pgp-signature): Use
`mime-raw-write-region'.
---

diff --git a/mime-pgp.el b/mime-pgp.el
index ae3e2e6..b872ab4 100644
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -189,9 +189,9 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
 	 (orig-file (make-temp-name basename))
 	 (sig-file (concat orig-file ".sig"))
 	 )
-    (write-region-as-binary (mime-entity-point-min oinfo)
-			    (mime-entity-point-max oinfo)
-			    orig-file)
+    (mime-raw-write-region (mime-entity-point-min oinfo)
+			   (mime-entity-point-max oinfo)
+			   orig-file)
     (save-excursion (mime-show-echo-buffer))
     (mime-write-decoded-region (save-excursion
 				 (goto-char start)