mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 10:50:49 -08:00
Code Issues Projects Releases Wiki Activity

(mail-setup): Make fill-column wide for the in-reply-to.

Browse source
This commit is contained in:
Richard M. Stallman 1994-11-18 16:41:07 +00:00
parent 626a097ccf
commit 58cabff051
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lisp/mail/sendmail.el
View file

@ -216,6 +216,7 @@ actually occur.")
(fill-region-as-paragraph address-start (point-max)))) (fill-region-as-paragraph address-start (point-max))))
(if in-reply-to (if in-reply-to
(let ((fill-prefix "\t") (let ((fill-prefix "\t")
(fill-column 78)
(address-start (point))) (address-start (point)))
(insert "In-reply-to: " in-reply-to "\n") (insert "In-reply-to: " in-reply-to "\n")
(fill-region-as-paragraph address-start (point-max)))) (fill-region-as-paragraph address-start (point-max))))