diff --git a/Utility/DiskFree.hs b/Utility/DiskFree.hs index f13cb6efa8..f04f636ecc 100644 --- a/Utility/DiskFree.hs +++ b/Utility/DiskFree.hs @@ -43,6 +43,8 @@ getDiskFree path = catchMaybeIO $ do return $ toInteger sectors * toInteger bytes * toInteger nfree #else +#warning Building without disk free space checking support + getDiskFree :: FilePath -> IO (Maybe Integer) getDiskFree _ = return Nothing