From a32ee5026be0646129b0a6aea5a607e109c2b35c Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Tue, 20 Jan 2026 12:31:51 +0100 Subject: [PATCH] Extend Tramp traces * lisp/net/tramp-message.el (tramp-debug-message): Change selection for `trace-function-background'. --- lisp/net/tramp-message.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/net/tramp-message.el b/lisp/net/tramp-message.el index fe7758bdb08..7b405061ba8 100644 --- a/lisp/net/tramp-message.el +++ b/lisp/net/tramp-message.el @@ -240,8 +240,10 @@ ARGUMENTS to actually emit the message (if applicable)." (dolist (elt (append - (mapcar - #'intern (all-completions "tramp-" obarray #'functionp)) + (apropos-internal (rx bos "tramp-") #'functionp) + (apropos-internal (rx bos "tramp-") #'macrop) + (apropos-internal + (rx bos "with-" (? "parsed-") "tramp-") #'macrop) tramp-trace-functions)) (unless (get elt 'tramp-suppress-trace) (trace-function-background elt (tramp-trace-buffer-name vec)))))