diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2015-12-20 01:14:35 +0100 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2015-12-20 01:14:35 +0100 |
| commit | 19692aab1913730fc10ffda515b77db7308bcf11 (patch) | |
| tree | 64408b3be93858108759eb85ddbc6c956778cfa4 /haddock-api/src/Haddock/Interface.hs | |
| parent | edb3feb49d7d87365abac961368367944d85022d (diff) | |
| parent | 52bc03a00cf57764cdab5124ee2b12acd5ad3780 (diff) | |
Merge remote-tracking branch 'phadej/orphans' into ghc-head
Diffstat (limited to 'haddock-api/src/Haddock/Interface.hs')
| -rw-r--r-- | haddock-api/src/Haddock/Interface.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock/Interface.hs b/haddock-api/src/Haddock/Interface.hs index afb5111e..62b0aea9 100644 --- a/haddock-api/src/Haddock/Interface.hs +++ b/haddock-api/src/Haddock/Interface.hs @@ -228,7 +228,7 @@ buildHomeLinks ifaces = foldl upd Map.empty (reverse ifaces) foldl' keep_old old_env exported_names | otherwise = foldl' keep_new old_env exported_names where - exported_names = ifaceVisibleExports iface + exported_names = ifaceVisibleExports iface ++ map getName (ifaceInstances iface) mdl = ifaceMod iface keep_old env n = Map.insertWith (\_ old -> old) n mdl env keep_new env n = Map.insert n mdl env |