From 22b300dea0c02b7b7ce32a399ceec3ee603b2bed Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Mon, 28 Feb 2011 11:58:59 +0100 Subject: [PATCH] * net/tramp-cmds.el (tramp-append-tramp-buffers): Dump load-path shadows. --- lisp/ChangeLog | 5 +++++ lisp/net/tramp-cmds.el | 6 ++++++ 2 files changed, 11 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 05541c793d9..83b29a7e55c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-02-28 Michael Albinus + + * net/tramp-cmds.el (tramp-append-tramp-buffers): Dump load-path + shadows. + 2011-02-28 Antoine Levitt (tiny change) * dired-x.el (dired-guess-shell-alist-default): Add rar and 7z. diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el index 7d266ad17d7..58f1e2c6a9e 100644 --- a/lisp/net/tramp-cmds.el +++ b/lisp/net/tramp-cmds.el @@ -281,6 +281,12 @@ buffer in your bug report. (insert ")\n")) (insert-buffer-substring elbuf))) + ;; Dump load-path shadows. + (insert "\nload-path shadows:\n==================\n") + (ignore-errors + (mapc (lambda (x) (when (string-match "tramp" x) (insert x "\n"))) + (split-string (list-load-path-shadows t) "\n"))) + ;; Append buffers only when we are in message mode. (when (and (eq major-mode 'message-mode) -- 2.39.5