From: Michael Albinus <michael.albinus@gmx.de>
Date: Tue, 17 Jan 2017 16:23:46 +0000 (+0100)
Subject: Fix auto-save-file-name problem in Tramp on MS Windows. Do not merge
X-Git-Tag: emacs-25.2-rc1~22
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3993dc500d9b56723ced7530ead8d11c0ae42319;p=emacs.git

Fix auto-save-file-name problem in Tramp on MS Windows. Do not merge

* lisp/net/tramp.el (tramp-handle-make-auto-save-file-name):
Fix a problem when running on MS Windows.
---

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index b4242c0e6a7..f350f2a40d8 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -4102,7 +4102,11 @@ this file, if that variable is non-nil."
 	      (file-exists-p tramp-auto-save-directory))
     (make-directory tramp-auto-save-directory t))
 
-  (let ((system-type 'not-windows)
+  (let ((system-type
+	 (if (and (stringp tramp-auto-save-directory)
+		  (file-remote-p tramp-auto-save-directory))
+	     'not-windows
+	   system-type))
 	(auto-save-file-name-transforms
 	 (if (and (null tramp-auto-save-directory)
 		  (boundp 'auto-save-file-name-transforms))