[PATCH] Adds separators to non-MIME forwards (can someone apply?)

[Emerick Rogul <emerick@cs.bu.edu>]

[-- Attachment #1: Type: text/plain, Size: 396 bytes --]

Can someone please apply this patch to the CVS gnus?

It adds the "------ Start of forwarded message -------" and "------
End of forwarded message ------" separators to non-MIME forwards.
This used to be standard in old versions of gnus, but has gone missing
as of late.

Thanks,

-Emerick

PS: This is my first time creating a patch, so I hope it works OK.  It
seemed to work fine for me.  :-)


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Adds start/end separators to non-MIME forwards --]
[-- Type: text/x-patch, Size: 762 bytes --]

--- message.old	Mon Mar 13 12:15:39 2000
+++ /home/alumni/emerick/message.el	Wed Apr  5 19:29:44 2000
@@ -3898,13 +3898,14 @@
     (message-goto-body)
     (if message-forward-as-mime
 	(insert "\n\n<#part type=message/rfc822 disposition=inline>\n")
-      (insert "\n\n"))
+      (insert "\n-------------------- Start of forwarded message --------------------\n"))
     (let ((b (point))
 	  e)
       (mml-insert-buffer cur)
       (setq e (point))
-      (and message-forward-as-mime
-	   (insert "<#/part>\n"))
+      (if message-forward-as-mime
+	   (insert "<#/part>\n")
+	(insert "\n-------------------- End of forwarded message --------------------\n"))
       (when (and (not current-prefix-arg)
 		 message-forward-ignored-headers)
 	(save-restriction