[Emacs-diffs] trunk r117234: * net/tramp.el (tramp-handle-unhandled-file-name-directory): Return "/".

[Michael Albinus]

------------------------------------------------------------
revno: 117234
revision-id: address@hidden
parent: address@hidden
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Mon 2014-06-02 17:17:39 +0200
message:
  * net/tramp.el (tramp-handle-unhandled-file-name-directory): Return "/".
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/net/tramp.el              tramp.el-20091113204419-o5vbwnq5f7feedwu-2427

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-06-02 13:51:35 +0000
+++ b/lisp/ChangeLog    2014-06-02 15:17:39 +0000
@@ -2,6 +2,7 @@
 
        * net/tramp.el (with-tramp-progress-reporter, tramp-call-process):
        Add traces.
+       (tramp-handle-unhandled-file-name-directory): Return "/".
 
 2014-06-02  Wilson Snyder  <address@hidden>
 

=== modified file 'lisp/net/tramp.el'
--- a/lisp/net/tramp.el 2014-06-02 14:17:07 +0000
+++ b/lisp/net/tramp.el 2014-06-02 15:17:39 +0000
@@ -3340,8 +3340,9 @@
 (defun tramp-handle-unhandled-file-name-directory (_filename)
   "Like `unhandled-file-name-directory' for Tramp files."
   ;; With Emacs 23, we could simply return `nil'.  But we must keep it
-  ;; for backward compatibility.
-  (expand-file-name "~/"))
+  ;; for backward compatibility.  "~/" cannot be returned, because
+  ;; there might be machines without a HOME directory (like hydra).
+  "/")
 
 (defun tramp-handle-set-visited-file-modtime (&optional time-list)
   "Like `set-visited-file-modtime' for Tramp files."