Mercurial > emacs
diff lisp/vc-hooks.el @ 74939:e58390f88130
(vc-version-backup-file-name): Revision names may be
composed of arbitrary characters (even /) in some systems.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 27 Dec 2006 16:25:42 +0000 |
parents | b2e5081b9320 |
children | e3694f1cb928 17e0dd217877 bc10a33dd40b |
line wrap: on
line diff
--- a/lisp/vc-hooks.el Wed Dec 27 13:54:47 2006 +0000 +++ b/lisp/vc-hooks.el Wed Dec 27 16:25:42 2006 +0000 @@ -625,9 +625,10 @@ a regexp for matching all such backup files, regardless of the version." (if regexp (concat (regexp-quote (file-name-nondirectory file)) - "\\.~[0-9.]+" (unless manual "\\.") "~") + "\\.~.+" (unless manual "\\.") "~") (expand-file-name (concat (file-name-nondirectory file) - ".~" (or rev (vc-workfile-version file)) + ".~" (subst-char-in-string + ?/ ?_ (or rev (vc-workfile-version file))) (unless manual ".") "~") (file-name-directory file))))