diff options
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 6037b19435d..e226461bd83 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -1371,7 +1371,7 @@ the modes of the new file to agree with the old modes." | |||
| 1371 | (and backup-by-copying-when-mismatch | 1371 | (and backup-by-copying-when-mismatch |
| 1372 | (let ((attr (file-attributes real-file-name))) | 1372 | (let ((attr (file-attributes real-file-name))) |
| 1373 | (or (nth 9 attr) | 1373 | (or (nth 9 attr) |
| 1374 | (/= (nth 2 attr) (user-uid)))))) | 1374 | (not (file-ownership-preserved-p real-file-name)))))) |
| 1375 | (condition-case () | 1375 | (condition-case () |
| 1376 | (copy-file real-file-name backupname t t) | 1376 | (copy-file real-file-name backupname t t) |
| 1377 | (file-error | 1377 | (file-error |