diff lisp/gnus/nngateway.el @ 169:15872534500d r20-3b11

Import from CVS: tag r20-3b11
author cvs
date Mon, 13 Aug 2007 09:46:53 +0200
parents ec9a17fef872
children
line wrap: on
line diff
--- a/lisp/gnus/nngateway.el	Mon Aug 13 09:45:48 2007 +0200
+++ b/lisp/gnus/nngateway.el	Mon Aug 13 09:46:53 2007 +0200
@@ -58,9 +58,11 @@
 	(insert-buffer-substring buf)
 	(message-narrow-to-head)
 	(funcall nngateway-header-transformation nngateway-address)
+	(goto-char (point-max))
+	(insert mail-header-separator "\n")
 	(widen)
 	(let (message-required-mail-headers)
-	  (message-send-mail))))))
+	  (funcall message-send-mail-function))))))
 
 ;;; Internal functions