From: Glenn Morris <rgm@gnu.org>
Date: Sun, 24 Aug 2003 15:19:42 +0000 (+0000)
Subject: (file-newest-backup): Use `expand-file-name'.
X-Git-Tag: ttn-vms-21-2-B4~8999
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=783bf2100183083fbce45f639e612a6afb88362c;p=emacs.git

(file-newest-backup): Use `expand-file-name'.
---

diff --git a/lisp/files.el b/lisp/files.el
index 5ec82a39206..cd6f52d9f8f 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3343,7 +3343,7 @@ saying what text to write."
   ;; 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)))
+		    (make-backup-file-name (expand-file-name filename))))
 	 (file (file-name-nondirectory filename))
 	 (dir  (file-name-directory    filename))
 	 (comp (file-name-all-completions file dir))