diff options
| author | davve <davve@dtek.chalmers.se> | 2007-01-12 18:33:23 +0000 |
|---|---|---|
| committer | davve <davve@dtek.chalmers.se> | 2007-01-12 18:33:23 +0000 |
| commit | 0f2144d8c918261152f1efbf753cb975d94ce503 (patch) | |
| tree | fe240faaf60084b32d2b699fedcb134f2f26ea61 | |
| parent | 511be8bdbd4b1c5b1ed822b180a22dec8d6ca738 (diff) | |
Small type change
| -rw-r--r-- | src/Main.hs | 4 |
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 = [] |