From: morioka <morioka>
Date: Sun, 28 Jun 1998 23:45:27 +0000 (+0000)
Subject: (mime-store-message/partial-piece): Use `mime-write-entity-body'.
X-Git-Tag: remi-1_8_1~13
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8891832e561afc4fadf08e408fc0a43b50f66a6d;p=elisp%2Fsemi.git

(mime-store-message/partial-piece): Use `mime-write-entity-body'.
---

diff --git a/mime-play.el b/mime-play.el
index 875b12f..84366e8 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -478,8 +478,7 @@ saved as binary.  Otherwise the region is saved by `write-region'."
 	  (select-window pwin)
 	  )
       (setq file (concat root-dir "/" number))
-      (mime-raw-write-region (mime-entity-body-start entity)
-			     (mime-entity-body-end entity) file)
+      (mime-write-entity-body entity file)
       (let ((total-file (concat root-dir "/CT")))
 	(setq total
 	      (if total