aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhilipp Janda <siffiejoe@gmx.net>2013-10-14 19:03:58 +0200
committerPhilipp Janda <siffiejoe@gmx.net>2013-10-14 19:03:58 +0200
commitc557cda7a630933af93e923dd5edd38b462bd3c0 (patch)
treeba8e8d6229471eb65a6ee3ede1a2d7ad37ef29a8
parentef0653619052d02035e2cf6cc0b95effc543f3b1 (diff)
downloadluarocks-c557cda7a630933af93e923dd5edd38b462bd3c0.tar.gz
luarocks-c557cda7a630933af93e923dd5edd38b462bd3c0.tar.bz2
luarocks-c557cda7a630933af93e923dd5edd38b462bd3c0.zip
special handling for chdir and root directory
-rw-r--r--src/luarocks/fs/win32.lua6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/luarocks/fs/win32.lua b/src/luarocks/fs/win32.lua
index f7555439..78a9f730 100644
--- a/src/luarocks/fs/win32.lua
+++ b/src/luarocks/fs/win32.lua
@@ -40,6 +40,9 @@ function Q(arg)
40 if arg:match("^[%.a-zA-Z]?:?[\\/]") then 40 if arg:match("^[%.a-zA-Z]?:?[\\/]") then
41 arg = arg:gsub("/", "\\") 41 arg = arg:gsub("/", "\\")
42 end 42 end
43 if arg == "\\" then
44 return '\\' -- CHDIR needs special handling for root dir
45 end
43 -- URLs and anything else 46 -- URLs and anything else
44 arg = arg:gsub('(\\+)(")', q_escaper) 47 arg = arg:gsub('(\\+)(")', q_escaper)
45 arg = arg:gsub('(\\+)$', q_escaper) 48 arg = arg:gsub('(\\+)$', q_escaper)
@@ -58,6 +61,9 @@ function Qb(arg)
58 if arg:match("^[%.a-zA-Z]?:?[\\/]") then 61 if arg:match("^[%.a-zA-Z]?:?[\\/]") then
59 arg = arg:gsub("/", "\\") 62 arg = arg:gsub("/", "\\")
60 end 63 end
64 if arg == "\\" then
65 return '\\' -- CHDIR needs special handling for root dir
66 end
61 -- URLs and anything else 67 -- URLs and anything else
62 arg = arg:gsub('(\\+)(")', q_escaper) 68 arg = arg:gsub('(\\+)(")', q_escaper)
63 arg = arg:gsub('(\\+)$', q_escaper) 69 arg = arg:gsub('(\\+)$', q_escaper)