diff options
| author | Richard M. Stallman <[email protected]> | 1994-03-02 04:23:49 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1994-03-02 04:23:49 +0000 |
| commit | fdc1827fdb9bec87fca8bb8cd17e1a3aa9c63518 (patch) | |
| tree | 9b23424beb0722701000e88227d7b9d08402edb5 /lisp/mail | |
| parent | b7c49376aa8ed74ceb9d7409bfba0ab22e83e45e (diff) | |
(mail-do-fcc): Don't write a newline before the text.
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/sendmail.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index e0fa000fef..5b5606cc63 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -547,10 +547,7 @@ the user from the mailer." (if max (narrow-to-region (point-min) max)))))) ;; Else append to the file directly. (write-region - ;; Include a blank line before if file already exists. - - (if (file-exists-p (car fcc-list)) (point-min) (1+ (point-min))) - (point-max) (car fcc-list) t))) + (1+ (point-min)) (point-max) (car fcc-list) t))) (setq fcc-list (cdr fcc-list)))) (kill-buffer tembuf))) |