From: morioka <morioka>
Date: Fri, 12 Jun 1998 16:44:22 +0000 (+0000)
Subject: (mime-activate-mailcap-method): Use `mime-entity-body-start'.
X-Git-Tag: semi-1_6_0~31
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=50c1dcbca9d988bc7a90948ea1e0ef6ce73f3964;p=elisp%2Fsemi.git

(mime-activate-mailcap-method): Use `mime-entity-body-start'.
---

diff --git a/mime-play.el b/mime-play.el
index 8c72112..497a802 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -204,11 +204,8 @@ specified, play as it.  Default MODE is \"play\"."
 	(let ((method (cdr (assoc 'method situation)))
 	      (name (expand-file-name (mime-raw-get-filename situation)
 				      mime-temp-directory)))
-	  (mime-write-decoded-region (if (re-search-forward "^$" end t)
-					 (1+ (match-end 0))
-				       (point-min))
-				     end name
-				     (cdr (assq 'encoding situation)))
+	  (mime-write-decoded-region (mime-entity-body-start entity) end
+				     name (cdr (assq 'encoding situation)))
 	  (message "External method is starting...")
 	  (let ((process
 		 (let ((command