# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 753950652 0
# Node ID d9fb93d75f7461dcec2085d78ac9e866e6ab689a
# Parent  c002b7320691f9c75394c92682f419a1e6008abe
(gnus-inews-do-fcc): If gnus-author-copy-saver
is rmail-output, call rmail-output the proper way.

diff -r c002b7320691 -r d9fb93d75f74 lisp/=gnuspost.el
--- a/lisp/=gnuspost.el	Mon Nov 22 06:38:28 1993 +0000
+++ b/lisp/=gnuspost.el	Mon Nov 22 06:44:12 1993 +0000
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1989, 1990, 1993 Free Software Foundation, Inc.
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
-;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnuspost.el,v 1.14 1993/07/20 04:25:04 rms Exp rms $
+;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnuspost.el,v 1.15 1993/11/22 06:38:28 rms Exp rms $
 ;; Keywords: news
 
 ;; This file is part of GNU Emacs.
@@ -591,7 +591,8 @@
 		(t
 		 ;; Suggested by hyoko@flab.fujitsu.junet.
 		 ;; Save article in Unix mail format by default.
-		 (if gnus-author-copy-saver
+		 (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))
 		       (gnus-output-to-rmail fcc-file)