From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 4 Oct 1995 20:02:20 +0000 (+0000)
Subject: (gnus-inews-do-fcc): Use mail-file-babyl-p.
X-Git-Tag: emacs-19.34~2741
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee1323a2f508aee52c71e2fc7637370b556b9196;p=emacs.git

(gnus-inews-do-fcc): Use mail-file-babyl-p.
---

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."
 		 (if (and gnus-author-copy-saver
 			  (not (eq gnus-author-copy-saver 'rmail-output)))
 		     (funcall gnus-author-copy-saver fcc-file)
-		   (if (and (file-readable-p fcc-file) (rmail-file-p fcc-file))
+		   (if (and (file-readable-p fcc-file)
+			    (mail-file-babyl-p fcc-file))
 		       (gnus-output-to-rmail fcc-file)
 		     (rmail-output fcc-file 1 t t)))
 		 ))