diff options
author | Yuchen Pei <hi@ypei.me> | 2022-08-16 14:02:24 +1000 |
---|---|---|
committer | Yuchen Pei <hi@ypei.me> | 2022-08-16 14:02:24 +1000 |
commit | d0d177c3f4f0d4fd96238e2b5d577cf0282c3781 (patch) | |
tree | d14c483b558e1694d23677af7a234af5705be04f | |
parent | d7adfc2126da0547e2348c89f291696cff8efad1 (diff) |
minor fix dflags'
-rw-r--r-- | haddock-api/src/Haddock.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock.hs b/haddock-api/src/Haddock.hs index 581793d0..702c0fb1 100644 --- a/haddock-api/src/Haddock.hs +++ b/haddock-api/src/Haddock.hs @@ -472,7 +472,7 @@ render log' dflags unit_state flags sinceQual qual ifaces installedIfaces extSrc libDir return () when (Flag_Org `elem` flags) $ do - withTiming logger dflags' "ppOrg" (const ()) $ do + withTiming logger "ppOrg" (const ()) $ do _ <- {-# SCC ppOrg #-} ppOrg title pkgStr odir (_doc <$> prologue) visibleIfaces return () |