* message.el (message-mode): MML tags separate paragraphs. Small

	change from David S Goldberg <david.goldberg6@verizon.net>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e3826fb..1596c26 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -12,6 +12,9 @@
 
 2003-02-22  Kai Gro\e,A_\e(Bjohann  <kai.grossjohann@uni-duisburg.de>
 
+       * message.el (message-mode): MML tags separate paragraphs.  Small
+       change from David S Goldberg <david.goldberg6@verizon.net>.
+
        * gnus-agent.el (gnus-agent-get-undownloaded-list): Sort
        `gnus-newsgroup-headers'.
 

diff --git a/lisp/message.el b/lisp/message.el
index 0822e0a..f4562ce 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2270,6 +2270,9 @@ M-RET    `message-newline-and-reformat' (break the line and reformat)."
   (set (make-local-variable 'message-checksum) nil)
   (set (make-local-variable 'message-mime-part) 0)
   (message-setup-fill-variables)
+  (set (make-local-variable 'paragraph-separate)
+       (concat paragraph-separate
+              "\\|<#!*/?\\(multipart\\|part\\|external\\|mml\\|secure\\)"))
   ;; Allow using comment commands to add/remove quoting.
   (set (make-local-variable 'comment-start) message-yank-prefix)
   (if (featurep 'xemacs)