diff options
| author | Eli Zaretskii | 2003-08-30 10:56:38 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2003-08-30 10:56:38 +0000 |
| commit | ee9be3deb1104ec63f541ea93142c0fe407d59b9 (patch) | |
| tree | 1b311ed0d71821e09b7a25e63cb02df491bb3018 | |
| parent | 58ca48d187e2d32d19eec6b967589c165abe5583 (diff) | |
| download | emacs-ee9be3deb1104ec63f541ea93142c0fe407d59b9.tar.gz emacs-ee9be3deb1104ec63f541ea93142c0fe407d59b9.zip | |
(vc-make-version-backup): Fix the change made on
2003-07-26: msdos-long-file-names is a function, not a variable.
| -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))) |