From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 15 Jun 2008 13:40:27 +0000 (+0000)
Subject: * net/tramp-cmds.el (tramp-cleanup-all-connections): Reset
X-Git-Tag: emacs-pretest-23.0.90~4761
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6f77e7d72ed91a459b6ca47ff67d01a0b3ee3b51;p=emacs.git

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 809ace2bfb9..6d8266efdca 100644
--- 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 fae9e699c05..6acce78c02c 100644
--- 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)))