fix windows build

This commit is contained in:
Joey Hess 2021-09-02 12:21:25 -04:00
parent 40adf643de
commit bd5494bb9c
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 3 additions and 1 deletions

View file

@ -258,7 +258,7 @@ probeCrippledFileSystem'
-> Maybe (RawFilePath -> m ())
-> m (Bool, [String])
#ifdef mingw32_HOST_OS
probeCrippledFileSystem' _ _ _ _ = return (True, [])
probeCrippledFileSystem' _ _ _ = return (True, [])
#else
probeCrippledFileSystem' tmp freezecontent thawcontent = do
let f = tmp P.</> "gaprobe"