aboutsummaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authordavve <davve@dtek.chalmers.se>2007-01-12 18:33:23 +0000
committerdavve <davve@dtek.chalmers.se>2007-01-12 18:33:23 +0000
commit0f2144d8c918261152f1efbf753cb975d94ce503 (patch)
treefe240faaf60084b32d2b699fedcb134f2f26ea61 /src/Main.hs
parent511be8bdbd4b1c5b1ed822b180a22dec8d6ca738 (diff)
Small type change
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs
index cff23922..774e0811 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -1266,8 +1266,8 @@ getPackage session pkgInfo = do
}
-- | Build a package doc env out of a topologically sorted list of modules
-packageDocEnv :: [Module] -> [ModuleInfo] -> [(Name, Name)]
-packageDocEnv mods infos = concatMap moduleDocEnv (zip mods infos)
+packageDocEnv :: [Module] -> [ModuleInfo] -> PackageEnv
+packageDocEnv mods infos = Map.fromList $ concatMap moduleDocEnv (zip mods infos)
where
moduleDocEnv (mod, modInfo)
| "GHC" `isPrefixOf` moduleString mod = []