* net/tramp-cmds.el (tramp-cleanup-all-connections): Reset

`tramp-locked'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 809ace2bfb966ca706018810c54da93716f0e866..6d8266efdca8e4bf3599e676fb9cae4e02f50f60 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,13 @@
+2008-06-15  Michael Albinus  <michael.albinus@gmx.de>
+
+       * net/tramp.el (tramp-handle-start-file-process): Clear
+       modification time of the connection buffer.
+       (tramp-sh-file-name-handler): Reset `tramp-locked' in case of
+       error.
+
+       * net/tramp-cmds.el (tramp-cleanup-all-connections): Reset
+       `tramp-locked'.
+
 2008-06-15  Ulf Jasper  <ulf@web.de>
 
        * net/newst-treeview.el (newsticker--treeview-list-update)

diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el
index fae9e699c05a3ddbd5f9ebf62f58caf172457003..6acce78c02c69ed8783d60a7d99fa01aa540b30a 100644 (file)
--- a/lisp/net/tramp-cmds.el
+++ b/lisp/net/tramp-cmds.el
@@ -102,6 +102,9 @@ When called interactively, a Tramp connection has to be selected."
 This includes password cache, file cache, connection cache, buffers."
   (interactive)
 
+  ;; Unlock Tramp.
+  (setq tramp-locked nil)
+
   ;; Flush password cache.
   (when (functionp 'password-reset)
     (funcall (symbol-function 'password-reset)))