From: morioka <morioka>
Date: Sat, 25 May 1996 15:48:33 +0000 (+0000)
Subject: (mime-editor/process-multipart-1): fixed about condition of next tag
X-Git-Tag: Hokutetsu-Ishikawa-new~395
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2eb3cdde3b97c24a213174e1e83c5f1580f0c3a6;p=elisp%2Fsemi.git

(mime-editor/process-multipart-1): fixed about condition of next tag
inserting.
---

diff --git a/mime-edit.el b/mime-edit.el
index 9db477c..8a9b429 100644
--- 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.7 $
+;;; Version: $Revision: 0.8 $
 ;;; 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.7 1996-05-25 15:36:58 morioka Exp $")
+  "$Id: mime-edit.el,v 0.8 1996-05-25 15:48:33 morioka Exp $")
 
 (defconst mime-editor/version (get-version-string mime-editor/RCS-ID))
 
@@ -1453,10 +1453,10 @@ while if FLAG is `\\^M' (control-M) the text is hidden."
 		    (end (match-end 0))
 		    )
 		(delete-region beg end)
-		(if (and (not (looking-at mime-editor/single-part-tag-regexp))
-			 (not (eobp)))
+		(or (looking-at mime-editor/beginning-tag-regexp)
+		    (eobp)
 		    (insert (concat (mime-make-text-tag) "\n"))
-		  )))
+		    )))
 	  (cond ((string-equal type "quote")
 		 (mime-editor/enquote-region bb eb)
 		 )