X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mime-play.el;fp=mime-play.el;h=6e1d206ded5f83fb850d9194ad1122b22d9ad31f;hb=49e750f24aa7af0827c29c2d0465845dac54c411;hp=47ea860c9c2880d753a60b5fd4838c2cc51c2086;hpb=f4de2722943babb91aa53047de7f07243d888d52;p=elisp%2Fsemi.git

diff --git a/mime-play.el b/mime-play.el
index 47ea860..6e1d206 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -546,7 +546,6 @@ It is registered to variable `mime-preview-quitting-method-alist'."
 ;;;
 
 (defun mime-store-message/partial-piece (entity cal)
-  (goto-char (mime-entity-point-min entity))
   (let* ((root-dir
 	  (expand-file-name
 	   (concat "m-prts-" (user-login-name)) temporary-file-directory))
@@ -554,7 +553,7 @@ It is registered to variable `mime-preview-quitting-method-alist'."
 	 (number (cdr (assoc "number" cal)))
 	 (total (cdr (assoc "total" cal)))
 	 file
-	 (mother mime-preview-buffer)
+	 (mother (current-buffer))
 	 )
     (or (file-exists-p root-dir)
 	(make-directory root-dir)