From 4803e625deec92363f1be2547847fb1c833868d2 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 1 Nov 2001 20:44:11 +0000 Subject: [PATCH] (file-newest-backup): Don't pass backup file name thru file-name-sans-versions, because it never has version numbers. --- lisp/files.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 75937f7a86d..846b1e43589 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2866,8 +2866,7 @@ saying what text to write." ;; `make-backup-file-name' will get us the right directory for ;; ordinary or numeric backups. It might create a directory for ;; backups as a side-effect, according to `backup-directory-alist'. - (let* ((filename (file-name-sans-versions - (make-backup-file-name filename))) + (let* ((filename (make-backup-file-name filename)) (file (file-name-nondirectory filename)) (dir (file-name-directory filename)) (comp (file-name-all-completions file dir)) -- 2.39.5