summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJoachim Breitner <mail@joachim-breitner.de>2015-08-11 13:35:15 +0200
committerJoachim Breitner <mail@joachim-breitner.de>2015-08-11 13:35:15 +0200
commitf8e5aa8b00ff4907e56e41e8b40f4117164f91f6 (patch)
tree2c4bc38760ab63d8708e11012b4b9e4759e71568 /src
parent883b120d2873b2c0d542e6d6f85bad307c763ff2 (diff)
downloadDHG_packages-f8e5aa8b00ff4907e56e41e8b40f4117164f91f6.tar.gz
make-all: Take Build-Deps-Indep into account
Diffstat (limited to 'src')
-rw-r--r--src/make-all.hs7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/make-all.hs b/src/make-all.hs
index 21f64003f..976be8baf 100644
--- a/src/make-all.hs
+++ b/src/make-all.hs
@@ -123,16 +123,19 @@ binaryPackagesOfSource s = do
Left e -> fail (show e)
Right dc -> return $ map unBinPkgName $ debianBinaryPackageNames dc
--- TODO: Include Build-Depends-Indep
dependsOfDsc :: FilePath -> IO [String]
dependsOfDsc f = do
ret <- parseControlFromFile f
case ret of
Left e -> fail (show e)
Right (Control (p:_)) -> do
- case fieldValue "Build-Depends" (p:: Paragraph) of
+ deps <- case fieldValue "Build-Depends" (p:: Paragraph) of
Nothing -> fail "no Build-Depends"
Just depV -> return $ nub $ parseFlatRel depV
+ ideps <- case fieldValue "Build-Depends-Indep" (p:: Paragraph) of
+ Nothing -> return []
+ Just depV -> return $ nub $ parseFlatRel depV
+ return $ deps ++ ideps
-- Parsing package relations with flattening