emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-28 99a8c53247 1/2: Fix connection property incompatibility in Tram


From: Michael Albinus
Subject: emacs-28 99a8c53247 1/2: Fix connection property incompatibility in Tramp
Date: Fri, 30 Sep 2022 15:54:15 -0400 (EDT)

branch: emacs-28
commit 99a8c532470d9b1b6fc40211151b1ce196530d8e
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    Fix connection property incompatibility in Tramp
    
    * lisp/net/tramp.el (tramp-get-remote-tmpdir): Remove obsolete
    connection property "tmpdir".  (Bug#57800)
---
 lisp/net/tramp.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index f7243625c7..91dfb5c3c8 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -5459,6 +5459,11 @@ This handles also chrooted environments, which are not 
regarded as local."
 (defun tramp-get-remote-tmpdir (vec)
   "Return directory for temporary files on the remote host identified by VEC."
   (with-tramp-connection-property (tramp-get-process vec) "remote-tmpdir"
+    ;; Prior Tramp 2.5.3.2, the connection property "tmpdir" did exist
+    ;; with a remote file name.  This must be discarded.  (Bug#57800)
+    (when-let ((tmpdir (tramp-get-connection-property vec "tmpdir" nil)))
+      (when (tramp-tramp-file-p tmpdir)
+       (tramp-flush-connection-property vec "tmpdir")))
     (let ((dir
           (tramp-make-tramp-file-name
            vec (or (tramp-get-method-parameter vec 'tramp-tmpdir) "/tmp"))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]