|
@@ -1061,7 +1061,7 @@ let rec mkdir_recursive base dir_list =
|
|
in
|
|
in
|
|
let path_len = String.length path in
|
|
let path_len = String.length path in
|
|
let path =
|
|
let path =
|
|
- if path_len > 0 && path.[path_len - 1] = '/' || path.[path_len - 1] == '\\' then
|
|
|
|
|
|
+ if path_len > 0 && (path.[path_len - 1] = '/' || path.[path_len - 1] == '\\') then
|
|
String.sub path 0 (path_len - 1)
|
|
String.sub path 0 (path_len - 1)
|
|
else
|
|
else
|
|
path
|
|
path
|