From 68aaeb3519fd7f6176050e142f0dbc27e07992d2 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Thu, 7 Aug 2025 09:05:22 +0200 Subject: [PATCH] Fix Tramp completion * lisp/net/tramp.el (tramp-skeleton-file-name-all-completions): Filter out "" hits. (Bug#79173) --- lisp/net/tramp.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index f3e9556f797..503b370cb3d 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el @@ -2972,7 +2972,7 @@ not in completion mode." BODY is the backend specific code." (declare (indent 2) (debug t)) `(ignore-error file-missing - (delete-dups (delq nil + (delete-dups (delq nil (delete "" (let* ((case-fold-search read-file-name-completion-ignore-case) (result (progn ,@body))) ;; Some storage systems do not return "." and "..". @@ -2989,7 +2989,7 @@ BODY is the backend specific code." (dolist (elt completion-regexp-list x) (unless (string-match-p elt x) (throw 'match nil)))))) result) - result)))))) + result))))))) (defvar tramp--last-hop-directory nil "Tracks the directory from which to run login programs.")