From d36a1a5fb39529e396203b4da0c396ceedda133b Mon Sep 17 00:00:00 2001 From: Łukasz Hanuszczak Date: Tue, 18 Aug 2015 23:11:59 +0200 Subject: Make test runner ignore test packages with no modules. --- haddock-test/src/Test/Haddock/Config.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'haddock-test/src/Test') diff --git a/haddock-test/src/Test/Haddock/Config.hs b/haddock-test/src/Test/Haddock/Config.hs index f3056061..b1fd2098 100644 --- a/haddock-test/src/Test/Haddock/Config.hs +++ b/haddock-test/src/Test/Haddock/Config.hs @@ -261,7 +261,7 @@ processFileArgs' dcfg args = do { tpkgName = dir , tpkgFiles = map (srcDir' ) files } - pure $ rootPkg:otherPkgs + pure . filter (not . null . tpkgFiles) $ rootPkg:otherPkgs where doesDirectoryExist' path = doesDirectoryExist (srcDir path) isModule dir file = (isSourceFile file &&) <$> -- cgit v1.2.3