(mime/edit-again): fixed.

diff --git a/mime-edit.el b/mime-edit.el
index af80e03..90ad528 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -9,7 +9,7 @@
 ;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Created: 1994/08/21 renamed from mime.el by UMEDA Masanobu;
 ;;;          1996/05/24 renamed from tm-edit.el
-;;; Version: $Revision: 0.17 $
+;;; Version: $Revision: 0.18 $
 ;;; Keywords: mail, news, MIME, multimedia, multilingual
 ;;;
 ;;; This file is part of SEMI (September, Emacs MIME Interface)
@@ -123,7 +123,7 @@
 ;;;
 
 (defconst mime-editor/RCS-ID
-  "$Id: mime-edit.el,v 0.17 1996-05-28 08:12:43 morioka Exp $")
+  "$Id: mime-edit.el,v 0.18 1996-05-28 12:09:10 morioka Exp $")
 
 (defconst mime-editor/version (get-version-string mime-editor/RCS-ID))
 
@@ -2704,11 +2704,14 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
   (mime-editor::edit-again code-conversion)
   (goto-char (point-min))
   (save-restriction
-    (narrow-to-region (point-min)
-                     (if (re-search-forward "^$" nil t)
-                         (match-end 0)
-                       (point-max)
-                       ))
+    (narrow-to-region
+     (point-min)
+     (if (re-search-forward
+         (concat "^\\(" (regexp-quote mail-header-separator) "\\)?$")
+         nil t)
+        (match-end 0)
+       (point-max)
+       ))
     (goto-char (point-min))
     (while (re-search-forward
            "^\\(Content-.*\\|Mime-Version\\):" nil t)