windows build fix
This commit is contained in:
parent
92c7e67022
commit
42a9555d9f
1 changed files with 1 additions and 1 deletions
|
@ -152,7 +152,7 @@ probeCrippledFileSystem = do
|
|||
|
||||
probeCrippledFileSystem' :: FilePath -> IO (Bool, [String])
|
||||
#ifdef mingw32_HOST_OS
|
||||
probeCrippledFileSystem' _ = return True
|
||||
probeCrippledFileSystem' _ = return (True, [])
|
||||
#else
|
||||
probeCrippledFileSystem' tmp = do
|
||||
let f = tmp </> "gaprobe"
|
||||
|
|
Loading…
Add table
Reference in a new issue