; Another Tramp fix

* lisp/net/tramp.el (tramp-skeleton-file-truename):
Remove possible trailing slash.

(cherry picked from commit 2658f4eab96aaad7f52245c2422bbfa51db9b207)

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index db40cbbb820a202ab10d8131ffa77b362bdd04c9..efd4f3591bcbd319bc02733658dd3013327e41e2 100644 (file)
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -3627,7 +3627,8 @@ BODY is the backend specific code."
            ;; it for security reasons.
            (when (tramp-tramp-file-p result)
              (setq result (file-name-quote result 'top)))
-           result)))))))
+           ;; Remove possible trailing slash.
+           (directory-file-name result))))))))
 
 (defmacro tramp-skeleton-make-directory (dir &optional parents &rest body)
   "Skeleton for `tramp-*-handle-make-directory'.