# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 894169961 0
# Node ID 2abd8542d6dd9ad78ad9740169dc5d818bde85d8
# Parent  ff6a09ae9530fa200c90540b318435104d46a9a1
(uce-reply-to-uce): Use mail-sendmail-delimit-header.

diff -r ff6a09ae9530 -r 2abd8542d6dd lisp/mail/uce.el
--- a/lisp/mail/uce.el	Sun May 03 04:30:10 1998 +0000
+++ b/lisp/mail/uce.el	Sun May 03 04:32:41 1998 +0000
@@ -274,8 +274,8 @@
       (if mail-default-headers
           (insert mail-default-headers))
       (if mail-default-reply-to
-	  (insert "Reply-to: " mail-default-reply-to "\n"))
-      (insert mail-header-separator "\n")
+	  (insert "Reply-to: " mail-default-reply-to "\n\n"))
+      (mail-sendmail-delimit-header)
       ;; Insert all our text.  Then go back to the place where we started.
       (if to (setq to (point)))
       ;; Text of ranting.