(mime-editor/process-multipart-1): fixed about condition of next tag
authormorioka <morioka>
Sat, 25 May 1996 15:48:33 +0000 (15:48 +0000)
committermorioka <morioka>
Sat, 25 May 1996 15:48:33 +0000 (15:48 +0000)
inserting.

mime-edit.el

index 9db477c..8a9b429 100644 (file)
@@ -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)
 ;;;
 
 (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)
                 )