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

(sendmail-send-it): Report invalid values of mail-from-style.

Browse source
This commit is contained in:
Richard M. Stallman 1998-08-14 08:58:00 +00:00
parent 631ba13e27
commit 55c3534be0
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/mail/sendmail.el
View file

@ -852,7 +852,10 @@ the user from the mailer."
(goto-char fullname-start))))
(insert ")\n"))
((null mail-from-style)
(insert "From: " login "\n")))))
(insert "From: " login "\n"))
((eq mail-from-style 'system-default)
nil)
(t (error "Invalid value for `system-default'")))))
;; Insert an extra newline if we need it to work around
;; Sun's bug that swallows newlines.
(goto-char (1+ delimline))