From 2eb3cdde3b97c24a213174e1e83c5f1580f0c3a6 Mon Sep 17 00:00:00 2001 From: morioka Date: Sat, 25 May 1996 15:48:33 +0000 Subject: [PATCH] (mime-editor/process-multipart-1): fixed about condition of next tag inserting. --- mime-edit.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) 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 ;;; 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) ) -- 1.7.10.4