diff lisp/gnus/gnus-uu.el @ 69949:d0312c3f2374

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-214 Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 83) - Update from CVS
author Miles Bader <miles@gnu.org>
date Wed, 12 Apr 2006 05:23:27 +0000
parents 1077b8039c32
children e3694f1cb928 c156f6a9e7b5
line wrap: on
line diff
--- a/lisp/gnus/gnus-uu.el	Wed Apr 12 05:11:12 2006 +0000
+++ b/lisp/gnus/gnus-uu.el	Wed Apr 12 05:23:27 2006 +0000
@@ -839,7 +839,9 @@
 		       "Date: %s\nFrom: %s\nSubject: %s Digest\n\n"
 		       (message-make-date) name name))
 	      (when (and message-forward-as-mime gnus-uu-digest-buffer)
-		(insert "<#part type=message/rfc822>\nSubject: Topics\n\n"))
+		(insert
+		 "<#mml type=message/rfc822>\nSubject: Topics\n\n<#/mml>\n")
+		(forward-line -1))
 	      (insert "Topics:\n")))
 	(when (not (eq in-state 'end))
 	  (setq state (list 'middle))))