Mercurial > emacs
changeset 21921:ea04bf51647c
(post-mail-send-it): Use mail-sendmail-undelimit-header.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 03 May 1998 04:36:03 +0000 |
parents | eeb4e3a385db |
children | 714591991067 |
files | lisp/mail/mailpost.el |
diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/mailpost.el Sun May 03 04:35:16 1998 +0000 +++ b/lisp/mail/mailpost.el Sun May 03 04:36:03 1998 +0000 @@ -43,10 +43,7 @@ (or (= (preceding-char) ?\n) (insert ?\n)) ;; Change header-delimiter to be what post-mail expects. - (goto-char (point-min)) - (search-forward (concat "\n" mail-header-separator "\n")) - (replace-match "\n\n") - (backward-char 1) + (mail-sendmail-undelimit-header) (setq delimline (point-marker)) (if mail-aliases (expand-mail-aliases (point-min) delimline))