(mime-store-message/partial-piece): Don't move to point-min.

diff --git a/mime-play.el b/mime-play.el
index 2389bc2..12c8ad3 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -545,7 +545,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))