diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2005-11-17 16:30:52 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2005-11-17 16:30:52 +0000 |
| commit | 4ea0018b7fd298525be4b9eb54d720a74e2f18a1 (patch) | |
| tree | 24d3e53614f889bc69fea4a1972410da37fe3cf6 /lisp/mail/mailheader.el | |
| parent | 9f5f5ff2cf0d6b186470c70b2d71aa7f05260daa (diff) | |
| download | emacs-4ea0018b7fd298525be4b9eb54d720a74e2f18a1.tar.gz | |
* simple.el (hard-newline): New variable.
* mail/sendmail.el (mail-setup, mail-send, mail-insert-from-field)
(sendmail-send-it, mail-do-fcc, mail-cc, mail-bcc, mail-fcc)
(mail-mail-reply-to, mail-mail-followup-to)
(mail-position-on-field, mail-signature, mail-yank-original)
(mail-attach-file): Use it.
* mail/mailheader.el (mail-header-format)
(mail-header-format-function): Likewise.
* add-log.el (add-change-log-entry, change-log-merge): Likewise.
Diffstat (limited to 'lisp/mail/mailheader.el')
| -rw-r--r-- | lisp/mail/mailheader.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/mailheader.el b/lisp/mail/mailheader.el index 1e9a24da341..aeed54a5ace 100644 --- a/lisp/mail/mailheader.el +++ b/lisp/mail/mailheader.el @@ -146,7 +146,7 @@ skip the header altogether if there are no other elements. (insert (capitalize (symbol-name header)) ": " (if (consp value) (car value) value) - "\n"))) + hard-newline))) (defun mail-header-format (format-rules headers) "Use FORMAT-RULES to format HEADERS and insert into current buffer. @@ -187,7 +187,7 @@ A key of nil has as its value a list of defaulted headers to ignore." (if (cdr rule) (funcall (cdr rule) header value) (funcall mail-header-format-function header value)))))) - (insert "\n"))) + (insert hard-newline))) (provide 'mailheader) |
