; Fix last change

(cherry picked from commit 7d7aa65f63db78c5732f1580213fc3767b767a4a)

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 8c649f284156030d4d5e104d17c6d0ff9b152053..9efd547624274ca26da0c3ab0fc1da1e23231aba 100644 (file)
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -1513,8 +1513,9 @@ calling HANDLER.")
 ;; so .... here we are.
 ;;;###tramp-autoload(require 'cl-lib)
 ;;;###tramp-autoload
-(cl-defstruct (tramp-file-name (:type list) :named)
-  method user domain host port localname hop)
+(progn
+  (cl-defstruct (tramp-file-name (:type list) :named)
+    method user domain host port localname hop))
 
 (tramp--with-startup
  (function-put #'tramp-file-name-method 'tramp-suppress-trace t)