kayvan@mrspoc.transact.com (Kayvan Sylvan) (09/27/89)
In Emacs version 18.52 (I don't know if this is fixed in later versions), If I FCC mail to a new file, the file that is created has a starting blank line (made because of an inserted newsline before the "From " line). When I visit such a file with VM, it shows "no messages". The following small patch to sendmail fixes this problem. We really should not have a blank line inserted unless the file exists. ---Kayvan --- Kayvan Sylvan @ Transact Software, Inc. -*- Los Altos, CA (415) 961-6112 Internet: kayvan@Transact.COM -*- UUCP: ...!{apple,pyramid,mips}!mrspoc!kayvan Hi ho, hi ho! ... The spice must flow... Hi ho, hi ho!... Off to work we go! *** sendmail.el~ Wed Sep 27 01:47:16 1989 --- sendmail.el Wed Sep 27 01:47:16 1989 *************** *** 296,300 (insert-buffer-substring curbuf beg end))) ;; Else append to the file directly. ! (write-region (point-min) (point-max) (car fcc-list) t))) (setq fcc-list (cdr fcc-list)))) (kill-buffer tembuf))) --- 296,302 ----- (insert-buffer-substring curbuf beg end))) ;; Else append to the file directly. ! (write-region ! (if (file-exists-p (car fcc-list)) (point-min) (1+ (point-min))) ! (point-max) (car fcc-list) t))) (setq fcc-list (cdr fcc-list)))) (kill-buffer tembuf)))