aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock/Backends/Xhtml
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-04-26 09:35:15 -0400
committerGitHub <noreply@github.com>2020-04-26 09:35:15 -0400
commit7c34f89d801bafba3162bc091dd486cbb9e9fd5b (patch)
tree1cc57abaaa39c4523822f95ffb9c61156f1f28e4 /haddock-api/src/Haddock/Backends/Xhtml
parentda4e2bd788b6231494d6ac56a8e88bcfa4be51f6 (diff)
parent2d2587182568cc5aa4b29d401517337c32459c66 (diff)
Merge pull request #1166 from hsyl20/wip/hsyl20/modules/utils
Module structure
Diffstat (limited to 'haddock-api/src/Haddock/Backends/Xhtml')
-rw-r--r--haddock-api/src/Haddock/Backends/Xhtml/Decl.hs2
-rw-r--r--haddock-api/src/Haddock/Backends/Xhtml/Layout.hs2
-rw-r--r--haddock-api/src/Haddock/Backends/Xhtml/Names.hs2
3 files changed, 3 insertions, 3 deletions
diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs b/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs
index 153caf86..a8ff584d 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs
@@ -38,7 +38,7 @@ import GHC.Types.Basic (PromotionFlag(..), isPromoted)
import GHC hiding (LexicalFixity(..))
import GHC.Exts
import GHC.Types.Name
-import BooleanFormula
+import GHC.Data.BooleanFormula
import GHC.Types.Name.Reader ( rdrNameOcc )
-- | Pretty print a declaration
diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs b/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs
index e08bf575..21d544cd 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs
@@ -49,7 +49,7 @@ import qualified Data.Map as Map
import Text.XHtml hiding ( name, title, quote )
import Data.Maybe (fromMaybe)
-import FastString ( unpackFS )
+import GHC.Data.FastString ( unpackFS )
import GHC
import GHC.Types.Name (nameOccName)
diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Names.hs b/haddock-api/src/Haddock/Backends/Xhtml/Names.hs
index 6c5fecee..83279f70 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml/Names.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml/Names.hs
@@ -29,7 +29,7 @@ import qualified Data.List as List
import GHC hiding (LexicalFixity(..))
import GHC.Types.Name
import GHC.Types.Name.Reader
-import FastString (unpackFS)
+import GHC.Data.FastString (unpackFS)
-- | Indicator of how to render a 'DocName' into 'Html'