/[emacs]/emacs/lisp/vc-hooks.el
ViewVC logotype

Diff of /emacs/lisp/vc-hooks.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.158 by rost, Sat Aug 23 23:04:20 2003 UTC revision 1.159 by eliz, Sat Aug 30 10:56:38 2003 UTC
# Line 589  a regexp for matching all such backup fi Line 589  a regexp for matching all such backup fi
589    "Make a backup copy of FILE, which is assumed in sync with the repository.    "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."  Before doing that, check if there are any old backups and get rid of them."
591    (unless (and (fboundp 'msdos-long-file-names)    (unless (and (fboundp 'msdos-long-file-names)
592                 (not (with-no-warnings msdos-long-file-names)))                 (not (with-no-warnings (msdos-long-file-names))))
593      (vc-delete-automatic-version-backups file)      (vc-delete-automatic-version-backups file)
594      (copy-file file (vc-version-backup-file-name file)      (copy-file file (vc-version-backup-file-name file)
595                 nil 'keep-date)))                 nil 'keep-date)))

Legend:
Removed from v.1.158  
changed lines
  Added in v.1.159

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26