From dbb12f2cf894599eebec37bc08eef09366458c32 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 18 Jul 1995 20:57:57 +0000 Subject: [PATCH] (file-name-sans-versions): Recognize version control version numbers. --- lisp/files.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index f6c0b5e9728..01705e3c57a 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -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)))))))) -- 2.39.2