From: Dani Moncayo <dmoncayo@gmail.com>
Date: Sat, 30 Nov 2013 15:42:13 +0000 (+0100)
Subject: msys-to-w32: Do not translate paths starting with %emacs_dir%.
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~624
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/a1209bc38de1f31cfae91239e85d449b4e11e110

msys-to-w32: Do not translate paths starting with %emacs_dir%.
* build-aux/msys-to-w32 (w32pathlist): Do not translate paths
  starting with %emacs_dir%.
---

diff --git a/ChangeLog b/ChangeLog
index 28d67634c7..33f9f6bca1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2013-11-30  Dani Moncayo  <dmoncayo@gmail.com>
+
+	* build-aux/msys-to-w32 (w32pathlist): Do not translate paths
+	starting with %emacs_dir%.
+
 2013-11-30  Glenn Morris  <rgm@gnu.org>
 
 	Stop keeping (most) generated cedet grammar files in the repository.
diff --git a/build-aux/msys-to-w32 b/build-aux/msys-to-w32
index e45ec3cb7e..a617f18af4 100755
--- a/build-aux/msys-to-w32
+++ b/build-aux/msys-to-w32
@@ -36,7 +36,8 @@ transformations:
 3. Replace two consecutive slashes with single ones.
 4. Translate to Windows-native format those paths that are not in such
    format already. The translated paths will not end with a slash,
-   except for root directories (e.g. 'c:/' or 'c:/foo').
+   except for root directories (e.g. 'c:/' or 'c:/foo').  Paths
+   starting with '%emacs_dir%' will not be translated.
 5. Escape with backslashes every occurrence of SEPARATOR2 within the paths.
 6. Concatenate the translated paths with SEPARATOR2.
 
@@ -100,7 +101,11 @@ do
     p="${p//\\//}"
     p="${p//\/\///}"
 
-    if test -d "$p"
+    if test "${p:0:11}" = "%emacs_dir%"
+    then
+	# Paths starting with "%emacs_dir%" will not be translated
+	w32p=$p
+    elif test -d "$p"
     then
 	# The path exists, so just translate it
 	w32p=`cd "$p" && pwd -W`
@@ -162,4 +167,4 @@ do
 done
 
 # Write the translated pathlist to the standard output
-printf "${w32pathlist}"
+printf "%s" "${w32pathlist}"