multipart を入れ子にする と余計な text パートが追加されてしまう

Hiroya Murata <[email protected]> Thu, 23 Nov 2006 11:27:31 +0900
Newsgroups gmane.mail.emacs.mime.japanese
Message-ID <uac2i523w.wl%[email protected]>
以下の例の様な multipart を作成すると内側の multipart の下に余計な
text パートが追加されてしまいます.
(一番下にそのものを置いておきます. 3.2 が要らない)

--< <mixed>>-{
--< <mixed>>-{
test
--}-< <mixed>>
--}-< <mixed>>

例は単純化したもので態々この様なものを作る人はいないと思いますが,
MIME-PGP の署名+暗号化したものを作成すると同じ様になります.

以下のパッチの様にすれば良いと思うのですが, どうでしょうか?

確認したのは, emiko-epg です. 何方か semi を使っている人がいれば,
確認して頂けると幸いです.

;; multipart tag の quote って出来ないんでしたっけ?

-- 
Hiroya Murata (村田 浩也) <[email protected]>
PGP fingerprint: 53B6 1B4A 8193 A2D4 1526  BC9E 9AEF 2F6D 249D 5F17

test
mime-edit.el.patch (application/octet-stream, 605 B)
Index: mime-edit.el
===================================================================
RCS file: /cvs/root/semi/mime-edit.el,v
retrieving revision 1.36.2.8.2.29.2.13
diff -u -w -r1.36.2.8.2.29.2.13 mime-edit.el
--- mime-edit.el	29 Sep 2006 10:02:09 -0000	1.36.2.8.2.29.2.13
+++ mime-edit.el	23 Nov 2006 01:58:54 -0000
@@ -1623,6 +1623,7 @@
 		    (end (match-end 0)))
 		(delete-region beg end)
 		(or (looking-at mime-edit-beginning-tag-regexp)
+		    (looking-at mime-edit-multipart-end-regexp)
 		    (eobp)
 		    (insert (concat (mime-make-text-tag) "\n")))))
 	  (cond ((string-equal type "quote")