diff options
| author | Richard M. Stallman | 1995-07-18 20:57:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-07-18 20:57:57 +0000 |
| commit | dbb12f2cf894599eebec37bc08eef09366458c32 (patch) | |
| tree | e8b2fee65139ed8cc47843e8b73f98dd0ce7efff | |
| parent | 45fc7cc3c58ab3748b27ad9cc796560c64de4bec (diff) | |
| download | emacs-dbb12f2cf894599eebec37bc08eef09366458c32.tar.gz emacs-dbb12f2cf894599eebec37bc08eef09366458c32.zip | |
(file-name-sans-versions): Recognize version control version numbers.
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 1491 | (length name)) | 1491 | (length name)) |
| 1492 | (if keep-backup-version | 1492 | (if keep-backup-version |
| 1493 | (length name) | 1493 | (length name) |
| 1494 | (or (string-match "\\.~[0-9]+~\\'" name) | 1494 | (or (string-match "\\.~[0-9.]+~\\'" name) |
| 1495 | (string-match "~\\'" name) | 1495 | (string-match "~\\'" name) |
| 1496 | (length name)))))))) | 1496 | (length name)))))))) |
| 1497 | 1497 | ||