Fix Tramp connection property

* lisp/net/tramp-gvfs.el (tramp-gvfs-maybe-open-connection):
* lisp/net/tramp-rclone.el (tramp-rclone-maybe-open-connection):
Set "connected" property in time.

(cherry picked from commit 7393d7419e97272fbca6323cf374ec021dbe82e2)

diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index 248ffb968226cd1289f0f9c556b2ea1f190fa605..fa32d5763ccf563f8defe389bfe85d7a1164f061 100644 (file)
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -2344,11 +2344,11 @@ connection if a previous connection has died for some reason."
          ;; Save the password.
          (ignore-errors
            (and (functionp tramp-password-save-function)
-                (funcall tramp-password-save-function)))
+                (funcall tramp-password-save-function))))))
 
-         ;; Mark it as connected.
-         (tramp-set-connection-property
-          (tramp-get-connection-process vec) "connected" t))))))
+    ;; Mark it as connected.
+    (tramp-set-connection-property
+     (tramp-get-connection-process vec) "connected" t)))
 
 (defun tramp-gvfs-gio-tool-p (vec)
   "Check, whether the gio tool is available."

diff --git a/lisp/net/tramp-rclone.el b/lisp/net/tramp-rclone.el
index 226e3805dad38bc37ed56dd2b496f3011b4538aa..68e481e45462f1e0e09424dee31ec1cafe030aaa 100644 (file)
--- a/lisp/net/tramp-rclone.el
+++ b/lisp/net/tramp-rclone.el
@@ -412,11 +412,11 @@ connection if a previous connection has died for some reason."
           (tramp-get-method-parameter vec 'tramp-mount-args))
          (while (not (file-exists-p (tramp-make-tramp-file-name vec 'noloc)))
            (tramp-cleanup-connection vec 'keep-debug 'keep-password))
+         (add-to-list 'tramp-fuse-mount-points (tramp-file-name-unify vec)))
 
-         ;; Mark it as connected.
-         (add-to-list 'tramp-fuse-mount-points (tramp-file-name-unify vec))
-         (tramp-set-connection-property
-          (tramp-get-connection-process vec) "connected" t))))
+       ;; Mark it as connected.
+       (tramp-set-connection-property
+        (tramp-get-connection-process vec) "connected" t)))
 
     ;; In `tramp-check-cached-permissions', the connection properties
     ;; "{uid,gid}-{integer,string}" are used.  We set them to proper values.