From e8d6e853f6668f7d24a26a02a7f15f79b4c0d0a9 Mon Sep 17 00:00:00 2001
From: Mikhail Glushenkov <mikhail.glushenkov@gmail.com>
Date: Wed, 11 Mar 2015 07:08:06 +0100
Subject: [PATCH] 'D.PD.Check': '{c,js}-sources' are not directories.
---
Cabal/Distribution/PackageDescription/Check.hs | 8 +++-----
1 file changed, 3 insertions(+), 5 deletions(-)
diff --git a/Cabal/Distribution/PackageDescription/Check.hs b/Cabal/Distribution/PackageDescription/Check.hs
index c92c5a0583..bd0c4c84b6 100644
--- a/Cabal/Distribution/PackageDescription/Check.hs
+++ b/Cabal/Distribution/PackageDescription/Check.hs
@@ -1442,11 +1442,9 @@ 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, "c-sources") | dir <- cSources bi ]
- ++ [ (dir, "js-sources") | dir <- jsSources bi ]
+ [ (dir, "extra-lib-dirs") | dir <- extraLibDirs bi ]
+ ++ [ (dir, "include-dirs") | dir <- includeDirs bi ]
+ ++ [ (dir, "hs-source-dirs") | dir <- hsSourceDirs bi ]
, isRelative dir ]
missing <- filterM (liftM not . doesDirectoryExist ops . fst) dirs
--
GitLab