aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog1
-rw-r--r--lisp/net/tramp.el5
2 files changed, 4 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 10de84b3c41..dff574972a4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,7 @@
2 2
3 * net/tramp.el (with-tramp-progress-reporter, tramp-call-process): 3 * net/tramp.el (with-tramp-progress-reporter, tramp-call-process):
4 Add traces. 4 Add traces.
5 (tramp-handle-unhandled-file-name-directory): Return "/".
5 6
62014-06-02 Wilson Snyder <wsnyder@wsnyder.org> 72014-06-02 Wilson Snyder <wsnyder@wsnyder.org>
7 8
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index deb89ed5894..36ee449659c 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -3340,8 +3340,9 @@ User is always nil."
3340(defun tramp-handle-unhandled-file-name-directory (_filename) 3340(defun tramp-handle-unhandled-file-name-directory (_filename)
3341 "Like `unhandled-file-name-directory' for Tramp files." 3341 "Like `unhandled-file-name-directory' for Tramp files."
3342 ;; With Emacs 23, we could simply return `nil'. But we must keep it 3342 ;; With Emacs 23, we could simply return `nil'. But we must keep it
3343 ;; for backward compatibility. 3343 ;; for backward compatibility. "~/" cannot be returned, because
3344 (expand-file-name "~/")) 3344 ;; there might be machines without a HOME directory (like hydra).
3345 "/")
3345 3346
3346(defun tramp-handle-set-visited-file-modtime (&optional time-list) 3347(defun tramp-handle-set-visited-file-modtime (&optional time-list)
3347 "Like `set-visited-file-modtime' for Tramp files." 3348 "Like `set-visited-file-modtime' for Tramp files."