diff options
| author | Richard M. Stallman | 1995-10-04 20:02:20 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-10-04 20:02:20 +0000 |
| commit | ee1323a2f508aee52c71e2fc7637370b556b9196 (patch) | |
| tree | 02e5161ce3502cbfa50753c53c682b763edd25e2 | |
| parent | 5bcb0278639c734589fd281a362b12c8a9f5baa2 (diff) | |
| download | emacs-ee1323a2f508aee52c71e2fc7637370b556b9196.tar.gz emacs-ee1323a2f508aee52c71e2fc7637370b556b9196.zip | |
(gnus-inews-do-fcc): Use mail-file-babyl-p.
| -rw-r--r-- | lisp/gnuspost.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnuspost.el b/lisp/gnuspost.el index a4aa82bb7f8..441feb245d2 100644 --- a/lisp/gnuspost.el +++ b/lisp/gnuspost.el | |||
| @@ -628,7 +628,8 @@ a program specified by the rest of the value." | |||
| 628 | (if (and gnus-author-copy-saver | 628 | (if (and gnus-author-copy-saver |
| 629 | (not (eq gnus-author-copy-saver 'rmail-output))) | 629 | (not (eq gnus-author-copy-saver 'rmail-output))) |
| 630 | (funcall gnus-author-copy-saver fcc-file) | 630 | (funcall gnus-author-copy-saver fcc-file) |
| 631 | (if (and (file-readable-p fcc-file) (rmail-file-p fcc-file)) | 631 | (if (and (file-readable-p fcc-file) |
| 632 | (mail-file-babyl-p fcc-file)) | ||
| 632 | (gnus-output-to-rmail fcc-file) | 633 | (gnus-output-to-rmail fcc-file) |
| 633 | (rmail-output fcc-file 1 t t))) | 634 | (rmail-output fcc-file 1 t t))) |
| 634 | )) | 635 | )) |