diff lisp/files.el @ 12591:7caa97ba6a7b

(file-name-sans-versions): Recognize version control version numbers.
author Richard M. Stallman <rms@gnu.org>
date Tue, 18 Jul 1995 20:57:57 +0000
parents d866a75c9a3c
children dde58f45b00a
line wrap: on
line diff
--- a/lisp/files.el	Tue Jul 18 20:55:46 1995 +0000
+++ b/lisp/files.el	Tue Jul 18 20:57:57 1995 +0000
@@ -1491,7 +1491,7 @@
 			 (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))))))))