Fix Bug#30038

* lisp/net/tramp.el (tramp-make-tramp-file-name): Check, that
method is not empty.  (Bug#30038)

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 1a8265200cb6ba603736662fc16d947822153dc3..72321dbdebab159ebcc40e01e41a46e11fb5bcf0 100644 (file)
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -1423,9 +1423,10 @@ the form (METHOD USER DOMAIN HOST PORT LOCALNAME &optional HOP)."
              localname (nth 5 args)
              hop (nth 6 args))))
 
+    (when (zerop (length method))
+      (signal 'wrong-type-argument (list 'stringp method)))
     (concat tramp-prefix-format hop
-           (unless (or (zerop (length method))
-                       (zerop (length tramp-postfix-method-format)))
+           (unless (zerop (length tramp-postfix-method-format))
              (concat method tramp-postfix-method-format))
            user
            (unless (zerop (length domain))