aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorMichael Albinus2017-11-18 14:24:03 +0100
committerMichael Albinus2017-11-18 14:24:03 +0100
commitc355529baedf3a5f03a8a4ee5904a5918f456b64 (patch)
treeba8058621743277be10798e2099fd3589c0c88d9 /lisp
parent4c21d04057d5f4f801d57e8aa2ffdab834ddc48a (diff)
downloademacs-c355529baedf3a5f03a8a4ee5904a5918f456b64.tar.gz
emacs-c355529baedf3a5f03a8a4ee5904a5918f456b64.zip
Fix bug in tramp-handle-file-truename
* lisp/net/tramp.el (tramp-handle-file-truename): Expand localname. * test/lisp/net/tramp-tests.el (tramp-test21-file-links): Check also relative symbolic links.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/net/tramp.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 3d5dcbdbb14..aadfcadebcf 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -3207,7 +3207,8 @@ User is always nil."
3207 (if (file-remote-p symlink-target) 3207 (if (file-remote-p symlink-target)
3208 (let (file-name-handler-alist) 3208 (let (file-name-handler-alist)
3209 (tramp-compat-file-name-quote symlink-target)) 3209 (tramp-compat-file-name-quote symlink-target))
3210 symlink-target) 3210 (expand-file-name
3211 symlink-target (file-name-directory v2-localname)))
3211 v2-localname))))) 3212 v2-localname)))))
3212 (when (>= numchase numchase-limit) 3213 (when (>= numchase numchase-limit)
3213 (tramp-error 3214 (tramp-error