summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
authorAndreas Schwab <schwab@suse.de>2007-09-22 08:51:41 +0000
committerAndreas Schwab <schwab@suse.de>2007-09-22 08:51:41 +0000
commit80efea7e7cb2216863956c2ecd86f52d8e7310e7 (patch)
tree34e6614a2f8404054a1287cfd7d24096848e706b /lisp/files.el
parentecd7fe0e3c223de4d8871fe90208049b09e1810e (diff)
downloademacs-80efea7e7cb2216863956c2ecd86f52d8e7310e7.tar.gz
(file-name-sans-versions): Also allow `_'.
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 17b4a6504db..bf7d34e2227 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3188,7 +3188,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-9a-z.]+~\\'" name)
+ (or (string-match "\\.~[-0-9a-z._]+~\\'" name)
(string-match "~\\'" name)
(length name))))))))