aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Interface/Create.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Haddock/Interface/Create.hs')
-rw-r--r--src/Haddock/Interface/Create.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Interface/Create.hs b/src/Haddock/Interface/Create.hs
index 77362c6d..fba25fe2 100644
--- a/src/Haddock/Interface/Create.hs
+++ b/src/Haddock/Interface/Create.hs
@@ -51,7 +51,7 @@ createInterface ghcMod flags modMap = do
opts0 <- mkDocOpts (ghcMbDocOpts ghcMod) flags mod
let opts
| Flag_IgnoreAllExports `elem` flags = OptIgnoreExports : opts0
- | otherwise = opts
+ | otherwise = opts0
let group = ghcGroup ghcMod
entities = (nubBy sameName . getTopEntities) group