[Emacs-diffs] Changes to emacs/lisp/files.el,v

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       07/10/21 10:48:28

Index: files.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/files.el,v
retrieving revision 1.935
retrieving revision 1.936
diff -u -b -r1.935 -r1.936
--- files.el    18 Oct 2007 19:59:52 -0000      1.935
+++ files.el    21 Oct 2007 10:48:28 -0000      1.936
@@ -3204,13 +3204,13 @@
          (set-default-file-modes ?\700)
          (when (condition-case nil
                    ;; Try to overwrite old backup first.
-                   (copy-file from-name to-name t t)
+                   (copy-file from-name to-name t t t)
                  (error t))
            (while (condition-case nil
                       (progn
                         (when (file-exists-p to-name)
                           (delete-file to-name))
-                        (copy-file from-name to-name nil t)
+                        (copy-file from-name to-name nil t t)
                         nil)
                     (file-already-exists t))
              ;; The file was somehow created by someone else between