# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 683233890 0
# Node ID 7812e9efc1af47969c42887c601220d9e74f08f2
# Parent  671fceb3316b90a536a256cfcdb3e517dc5746a0
*** empty log message ***

diff -r 671fceb3316b -r 7812e9efc1af src/fileio.c
--- a/src/fileio.c	Sun Aug 25 21:47:10 1991 +0000
+++ b/src/fileio.c	Mon Aug 26 19:11:30 1991 +0000
@@ -1363,14 +1363,15 @@
 }
 
 DEFUN ("copy-file", Fcopy_file, Scopy_file, 2, 4,
-  "fCopy file: \nFCopy %s to file: \np",
+  "fCopy file: \nFCopy %s to file: \np\nP",
   "Copy FILE to NEWNAME.  Both args must be strings.\n\
 Signals a `file-already-exists' error if file NEWNAME already exists,\n\
 unless a third argument OK-IF-ALREADY-EXISTS is supplied and non-nil.\n\
 A number as third arg means request confirmation if NEWNAME already exists.\n\
 This is what happens in interactive use with M-x.\n\
-Fourth arg non-nil means give the new file the same last-modified time\n\
-that the old one has.  (This works on only some systems.)")
+Fourth arg KEEP-TIME non-nil means give the new file the same\n\
+last-modified time as the old one.  (This works on only some systems.)\n\
+A prefix arg makes KEEP-TIME non-nil.")
   (filename, newname, ok_if_already_exists, keep_date)
      Lisp_Object filename, newname, ok_if_already_exists, keep_date;
 {
@@ -1956,7 +1957,7 @@
 
 #ifndef APOLLO
   if (stat (XSTRING (filename)->data, &st) < 0
-	|| (fd = open (XSTRING (filename)->data, 0)) < 0)
+      || (fd = open (XSTRING (filename)->data, 0)) < 0)
 #else
   if ((fd = open (XSTRING (filename)->data, 0)) < 0
       || fstat (fd, &st) < 0)