diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/luarocks/fs/win32.lua | 6 |
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) |