[Emacs-diffs] trunk r114709: * net/tramp-smb.el (tramp-smb-maybe-open-connection): Fix an error

[Michael Albinus]

------------------------------------------------------------
revno: 114709
revision-id: address@hidden
parent: address@hidden
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Fri 2013-10-18 12:22:02 +0200
message:
  * net/tramp-smb.el (tramp-smb-maybe-open-connection): Fix an error
  introduced on 2013-09-08, which results in an infinite loop
  requesting a password.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/net/tramp-smb.el          
trampsmb.el-20091113204419-o5vbwnq5f7feedwu-2515

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-10-18 08:48:33 +0000
+++ b/lisp/ChangeLog    2013-10-18 10:22:02 +0000
@@ -1,3 +1,9 @@
+2013-10-18  Michael Albinus  <address@hidden>
+
+       * net/tramp-smb.el (tramp-smb-maybe-open-connection): Fix an error
+       introduced on 2013-09-08, which results in an infinite loop
+       requesting a password.
+
 2013-10-18  Glenn Morris  <address@hidden>
 
        * progmodes/verilog-mode.el (verilog-case-fold): Add :version.
@@ -121,7 +127,7 @@
        connection property.
 
        * net/tramp-cache.el (top): Suppress traces when reading
-       presistency file.
+       persistency file.
 
        * net/tramp-sh.el (tramp-sh-handle-file-notify-add-watch):
        Refactor common code.  Improve debug message.

=== modified file 'lisp/net/tramp-smb.el'
--- a/lisp/net/tramp-smb.el     2013-10-17 19:39:22 +0000
+++ b/lisp/net/tramp-smb.el     2013-10-18 10:22:02 +0000
@@ -1901,9 +1901,9 @@
                            (search-forward-regexp
                             tramp-smb-wrong-passwd-regexp nil t))
                       ;; Disable `auth-source' and `password-cache'.
-                      (tramp-message
-                       vec 3 "Retry connection with new password")
                       (let (auth-sources)
+                        (tramp-message
+                         vec 3 "Retry connection with new password")
                         (tramp-cleanup-connection vec t)
                         (tramp-smb-maybe-open-connection vec argument))
                     ;; Propagate the error.