From 5b373bd3f77e143c895bae5ee6d0e227cce269df Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Wed, 12 Feb 2003 14:14:15 +0000 Subject: [PATCH] (file-truename): Revert change from 2002-11-27. --- lisp/ChangeLog | 4 ++++ lisp/files.el | 6 ++---- 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 773d4a06b3a..2d81a91486a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2003-02-12 Juanma Barranquero + + * files.el (file-truename): Revert change from 2002-11-27. + 2003-02-12 Luc Teirlinck * help-fns.el (describe-function-1): Change output for keyboard diff --git a/lisp/files.el b/lisp/files.el index 5ba163fc671..6d8aee3fe01 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -682,10 +682,8 @@ Do not specify them in other calls." (setq filename (funcall handler 'file-truename filename)) ;; If filename contains a wildcard, newname will be the old name. (unless (string-match "[[*?]" filename) - ;; If filename exists, use the long name, otherwise - ;; canonicalize the name, to handle case differences. - (setq filename (or (w32-long-file-name filename) - (untranslated-canonical-name filename))))) + ;; If filename exists, use the long name + (setq filename (or (w32-long-file-name filename) filename)))) (setq done t))) ;; If this file directly leads to a link, process that iteratively -- 2.39.2