Skip to content
Snippets Groups Projects
Commit f9e88b7c authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

Revert "'D.PD.Check': '{c,js}-sources' are not directories."

This reverts commit e8d6e853.
parent 4264b683
No related branches found
No related tags found
No related merge requests found
......@@ -1442,9 +1442,11 @@ checkLocalPathsExist ops pkg = do
let dirs = [ (dir, kind)
| bi <- allBuildInfo pkg
, (dir, kind) <-
[ (dir, "extra-lib-dirs") | dir <- extraLibDirs bi ]
++ [ (dir, "include-dirs") | dir <- includeDirs bi ]
++ [ (dir, "hs-source-dirs") | dir <- hsSourceDirs bi ]
[ (dir, "extra-lib-dirs") | dir <- extraLibDirs bi ]
++ [ (dir, "include-dirs") | dir <- includeDirs bi ]
++ [ (dir, "hs-source-dirs") | dir <- hsSourceDirs bi ]
++ [ (dir, "c-sources") | dir <- cSources bi ]
++ [ (dir, "js-sources") | dir <- jsSources bi ]
, isRelative dir ]
missing <- filterM (liftM not . doesDirectoryExist ops . fst) dirs
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment