Mercurial > emacs
comparison lisp/files.el @ 70961:ec18670c9aae
* files.el (backup-buffer-copy): Remove deleted MUSTBENEW argument
to copy-file.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Fri, 26 May 2006 15:21:21 +0000 |
| parents | 3279e0cf893a |
| children | ae67d314ac22 |
comparison
equal
deleted
inserted
replaced
| 70960:d876c40c06dd | 70961:ec18670c9aae |
|---|---|
| 2992 (while (condition-case () | 2992 (while (condition-case () |
| 2993 (progn | 2993 (progn |
| 2994 (condition-case nil | 2994 (condition-case nil |
| 2995 (delete-file to-name) | 2995 (delete-file to-name) |
| 2996 (file-error nil)) | 2996 (file-error nil)) |
| 2997 (copy-file from-name to-name t t 'excl) | 2997 (copy-file from-name to-name nil t) |
| 2998 nil) | 2998 nil) |
| 2999 (file-already-exists t)) | 2999 (file-already-exists t)) |
| 3000 ;; The file was somehow created by someone else between | 3000 ;; The file was somehow created by someone else between |
| 3001 ;; `delete-file' and `copy-file', so let's try again. | 3001 ;; `delete-file' and `copy-file', so let's try again. |
| 3002 nil)) | 3002 nil)) |