diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-05-07 21:28:39 +0200 |
|---|---|---|
| committer | Sylvain Henry <sylvain@haskus.fr> | 2020-06-08 15:31:47 +0200 |
| commit | 760cd58cfafe1ff25fcceed88ad2c824f10f6d6b (patch) | |
| tree | 0851065761a006a19051a1f9034dd30f634c3d23 /haddock-api/src/Haddock/Interface.hs | |
| parent | 792b82861a8abd03579a281dfdcbbb7081668997 (diff) | |
Fix after unit refactoring
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 b35b54e0..255cbdbc 100644 --- a/haddock-api/src/Haddock/Interface.hs +++ b/haddock-api/src/Haddock/Interface.hs @@ -167,7 +167,7 @@ processModule verbosity modsum flags modMap instIfaceMap = do -- See https://github.com/haskell/haddock/issues/469. hsc_env <- getSession let new_rdr_env = tcg_rdr_env . fst . GHC.tm_internals_ $ tm - this_pkg = thisPackage (hsc_dflags hsc_env) + this_pkg = homeUnit (hsc_dflags hsc_env) !mods = mkModuleSet [ nameModule name | gre <- globalRdrEnvElts new_rdr_env , let name = gre_name gre |