(mime-method-to-verify-application/pgp-signature): Use

`write-region-as-binary'.

diff --git a/mime-pgp.el b/mime-pgp.el
index 1dabb5b..88b6e28 100644 (file)
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -201,7 +201,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
       (while (re-search-forward "\n" nil t)
        (replace-match "\r\n")
        )
-      (as-binary-output-file (write-region (point-min)(point-max) orig-file))
+      (write-region-as-binary (point-min)(point-max) orig-file)
       (kill-buffer (current-buffer))
       )
     (save-excursion (mime-show-echo-buffer))