diff options
| author | Maxime Dénès | 2017-10-05 18:49:12 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-10-05 18:49:12 +0200 |
| commit | 73620255a7a62703a89026336f97a4bc8a913afd (patch) | |
| tree | 0b28d62d27b3fe6e94a07845ca8900cc9b3c9a71 /lib/system.ml | |
| parent | f78a39499ef210456dd96ecb9896874c9ce300ae (diff) | |
| parent | a47a249e8c31dece9b816bc49d6c5a2aa50fb21b (diff) | |
Merge PR #1041: Miscellaneous fixes about UTF-8 (including a fix to BZ#5715 to escape non-UTF-8 file names)
Diffstat (limited to 'lib/system.ml')
| -rw-r--r-- | lib/system.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/system.ml b/lib/system.ml index 12eacf2eaf..0b64b237da 100644 --- a/lib/system.ml +++ b/lib/system.ml @@ -52,7 +52,7 @@ let dirmap = ref StrMap.empty let make_dir_table dir = let filter_dotfiles s f = if f.[0] = '.' then s else StrSet.add f s in - Array.fold_left filter_dotfiles StrSet.empty (readdir dir) + Array.fold_left filter_dotfiles StrSet.empty (Sys.readdir dir) let exists_in_dir_respecting_case dir bf = let cache_dir dir = |