diff options
| -rw-r--r-- | lisp/vc-hooks.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index 36041751199..33ec82a94c2 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: FSF (see vc.el for full credits) | 6 | ;; Author: FSF (see vc.el for full credits) |
| 7 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> | 7 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> |
| 8 | 8 | ||
| 9 | ;; $Id: vc-hooks.el,v 1.157 2003/08/23 10:06:29 spiegel Exp $ | 9 | ;; $Id: vc-hooks.el,v 1.158 2003/08/23 23:04:20 rost Exp $ |
| 10 | 10 | ||
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | 12 | ||
| @@ -589,7 +589,7 @@ a regexp for matching all such backup files, regardless of the version." | |||
| 589 | "Make a backup copy of FILE, which is assumed in sync with the repository. | 589 | "Make a backup copy of FILE, which is assumed in sync with the repository. |
| 590 | Before doing that, check if there are any old backups and get rid of them." | 590 | Before doing that, check if there are any old backups and get rid of them." |
| 591 | (unless (and (fboundp 'msdos-long-file-names) | 591 | (unless (and (fboundp 'msdos-long-file-names) |
| 592 | (not (with-no-warnings msdos-long-file-names))) | 592 | (not (with-no-warnings (msdos-long-file-names)))) |
| 593 | (vc-delete-automatic-version-backups file) | 593 | (vc-delete-automatic-version-backups file) |
| 594 | (copy-file file (vc-version-backup-file-name file) | 594 | (copy-file file (vc-version-backup-file-name file) |
| 595 | nil 'keep-date))) | 595 | nil 'keep-date))) |