From: Michael Albinus <michael.albinus@gmx.de>
Date: Sat, 12 Oct 2019 10:19:59 +0000 (+0200)
Subject: * lisp/net/tramp.el (tramp-handle-access-file): Use `file-truename'.
X-Git-Tag: emacs-27.0.90~1135
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9c30c3bee0cf1b4e3d20e6821b079a22c6a08de6;p=emacs.git

* lisp/net/tramp.el (tramp-handle-access-file): Use `file-truename'.
---

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index d0d8f276ca2..2a60aff383b 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -2970,7 +2970,7 @@ User is always nil."
 
 (defun tramp-handle-access-file (filename string)
   "Like `access-file' for Tramp files."
-  (unless (file-readable-p filename)
+  (unless (file-readable-p (file-truename filename))
     (tramp-error
      (tramp-dissect-file-name filename) tramp-file-missing
      "%s: No such file or directory %s" string filename)))