From d32f204856958f2e2412550da17de4e976aa0074 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Wed, 11 May 2016 16:50:56 +0200 Subject: [PATCH] ; Remove instrumentation of tramp.el --- lisp/net/tramp.el | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 9f678554654..6f30f395cd4 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el @@ -2846,20 +2846,6 @@ User is always nil." (let ((v (tramp-dissect-file-name file t))) ;; Run the command on the localname portion only unless we are in ;; completion mode. - (when (getenv "NIX_STORE") - (message - "tramp-handle-file-name-as-directory file %s tramp-completion-mode-p %s result %s" - file (tramp-completion-mode-p) - (tramp-make-tramp-file-name - (tramp-file-name-method v) - (tramp-file-name-user v) - (tramp-file-name-host v) - (if (and (tramp-completion-mode-p) - (zerop (length (tramp-file-name-localname v)))) - "" - (tramp-run-real-handler - 'file-name-as-directory (list (or (tramp-file-name-localname v) "")))) - (tramp-file-name-hop v)))) (tramp-make-tramp-file-name (tramp-file-name-method v) (tramp-file-name-user v) -- 2.39.2