(mime-write-entity-body): Use `binary-write-region' instead of

`write-region-as-binary'.

diff --git a/mmbuffer.el b/mmbuffer.el
index 09273b9..b99d80b 100644 (file)
--- a/mmbuffer.el
+++ b/mmbuffer.el
@@ -125,10 +125,9 @@
                                            filename)
   (save-excursion
     (set-buffer (mime-buffer-entity-buffer-internal entity))
-    (write-region-as-binary (mime-buffer-entity-body-start-internal entity)
-                           (mime-buffer-entity-body-end-internal entity)
-                           filename)
-    ))
+    (binary-write-region (mime-buffer-entity-body-start-internal entity)
+                        (mime-buffer-entity-body-end-internal entity)
+                        filename)))
 
 
 ;;; @ entity content