diff options
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/files.el b/lisp/files.el index 8f33ee8d975..7b1c3cbec89 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1330,8 +1330,8 @@ we do not remove backup version numbers, only true file version numbers." ;; sign, zero or more digits, provided this is the ;; second period encountered outside of the ;; device/directory part of the file name. - (or (string-match ";[---+]?[0-9]*\\'" name) - (if (string-match "\\.[^]>:]*\\(\\.[---+]?[0-9]*\\)\\'" + (or (string-match ";[-+]?[0-9]*\\'" name) + (if (string-match "\\.[^]>:]*\\(\\.[-+]?[0-9]*\\)\\'" name) (match-beginning 1)) (length name)) |