diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2005-11-29 23:54:47 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2005-11-29 23:54:47 +0000 |
| commit | 15575807da8ad6088e2ae420e0dc1799b4608dd9 (patch) | |
| tree | 5ad051c36be79bc621b94dc3dd851f13e47d56ad /lisp/mail/mailheader.el | |
| parent | 3fefda51dd46afa45a3a51c9b3ae2e1b68dd2e48 (diff) | |
| download | emacs-15575807da8ad6088e2ae420e0dc1799b4608dd9.tar.gz emacs-15575807da8ad6088e2ae420e0dc1799b4608dd9.tar.bz2 emacs-15575807da8ad6088e2ae420e0dc1799b4608dd9.zip | |
* longlines.el (longlines-mode): Add mail-setup-hook.
* mail/mailheader.el, mail/sendmail.el: Revert 2005-11-17 changes.
* simple.el (sendmail-user-agent-compose, next-line):
Conditionally use hard-newline.
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 aeed54a5ace..1e9a24da341 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) - hard-newline))) + "\n"))) (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 hard-newline))) + (insert "\n"))) (provide 'mailheader) |