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

(mail-do-fcc): If file does not exist, assume it is not a Babyl file.

Browse source
This commit is contained in:
Richard M. Stallman 1994-10-14 04:49:32 +00:00
parent 8ed24d5a14
commit f20c9a8730
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/mail/sendmail.el
View file

@ -623,7 +623,8 @@ the user from the mailer."
(insert-buffer-substring curbuf beg end)))
(if max (narrow-to-region (point-min) max)))))
;; Else append to the file directly.
(if (mail-file-babyl-p (car fcc-list))
(if (and (file-exists-p (car fcc-list))
(mail-file-babyl-p (car fcc-list)))
;; If the file is a Babyl file,
;; convert the message to Babyl format.
(save-excursion