(file-truename): Revert change from 2002-11-27.

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  <lektu@terra.es>
+
+        * files.el (file-truename): Revert change from 2002-11-27.
+
 2003-02-12  Luc Teirlinck  <teirllm@mail.auburn.edu>
 
         * 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