1912 |
(if result |
(if result |
1913 |
(mapconcat 'identity (cons "" result) "/") |
(mapconcat 'identity (cons "" result) "/") |
1914 |
"/")) |
"/")) |
1915 |
(when is-dir (setq result (concat result "/"))) |
(when (and is-dir (or (string= "" result) |
1916 |
|
(not (string= (substring result -1) "/")))) |
1917 |
|
(setq result (concat result "/"))) |
1918 |
(tramp-message-for-buffer |
(tramp-message-for-buffer |
1919 |
multi-method method user host |
multi-method method user host |
1920 |
10 "True name of `%s' is `%s'" filename result) |
10 "True name of `%s' is `%s'" filename result) |