* fileio.c (Fcopy_file): Call file name handler with preserve_uid_gid.

diff --git a/src/ChangeLog b/src/ChangeLog
index 915e31f7c879acedf062ec869d7048faf8f470e9..3df88c6f3322618a231acbc99148d0693b214764 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2007-10-21  Michael Albinus  <michael.albinus@gmx.de>
+
+       * fileio.c (Fcopy_file): Call file name handler with preserve_uid_gid.
+
 2007-10-20  Juanma Barranquero  <lekktu@gmail.com>
 
        * doc.c (Fdocumentation): Check for advice in all cases.

diff --git a/src/fileio.c b/src/fileio.c
index b0b9240c5ab8134fb41632874d186b8e0d062a98..2d6f74a88409b514604723199c8acec0bfccfd94 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -2465,8 +2465,8 @@ uid and gid of FILE to NEWNAME.  */)
   if (NILP (handler))
     handler = Ffind_file_name_handler (newname, Qcopy_file);
   if (!NILP (handler))
-    RETURN_UNGCPRO (call5 (handler, Qcopy_file, file, newname,
-                          ok_if_already_exists, keep_time));
+    RETURN_UNGCPRO (call6 (handler, Qcopy_file, file, newname,
+                          ok_if_already_exists, keep_time, preserve_uid_gid));
 
   encoded_file = ENCODE_FILE (file);
   encoded_newname = ENCODE_FILE (newname);
@@ -4738,8 +4738,8 @@ variable `last-coding-system-used' to the coding system actually used.  */)
          int opoint_byte = PT_BYTE;
          int oinserted = ZV - BEGV;
          int ochars_modiff = CHARS_MODIFF;
-         
-         TEMP_SET_PT_BOTH (BEGV, BEGV_BYTE); 
+
+         TEMP_SET_PT_BOTH (BEGV, BEGV_BYTE);
          insval = call3 (Qformat_decode,
                          Qnil, make_number (oinserted), visit);
          CHECK_NUMBER (insval);
@@ -4775,7 +4775,7 @@ variable `last-coding-system-used' to the coding system actually used.  */)
              int opoint_byte = PT_BYTE;
              int oinserted = ZV - BEGV;
              int ochars_modiff = CHARS_MODIFF;
-             
+
              TEMP_SET_PT_BOTH (BEGV, BEGV_BYTE);
              insval = call1 (XCAR (p), make_number (oinserted));
              if (!NILP (insval))