1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-02 05:32:08 -08:00

(file-name-sans-versions): Recognize version control version numbers.

This commit is contained in:
Richard M. Stallman 1995-07-18 20:57:57 +00:00
parent 45fc7cc3c5
commit dbb12f2cf8

View file

@ -1491,7 +1491,7 @@ we do not remove backup version numbers, only true file version numbers."
(length name))
(if keep-backup-version
(length name)
(or (string-match "\\.~[0-9]+~\\'" name)
(or (string-match "\\.~[0-9.]+~\\'" name)
(string-match "~\\'" name)
(length name))))))))