diff options
| -rw-r--r-- | pandoc.cabal | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Readers/Haddock.hs | 3 | ||||
| -rw-r--r-- | stack.yaml | 1 |
3 files changed, 4 insertions, 2 deletions
diff --git a/pandoc.cabal b/pandoc.cabal index 241196d7c..c8e49c620 100644 --- a/pandoc.cabal +++ b/pandoc.cabal @@ -461,7 +461,7 @@ library exceptions >= 0.8 && < 0.11, file-embed >= 0.0 && < 0.1, filepath >= 1.1 && < 1.5, - haddock-library >= 1.8 && < 1.10, + haddock-library >= 1.10 && < 1.11, hslua >= 1.1 && < 1.4, hslua-module-path >= 0.1.0 && < 0.2.0, hslua-module-system >= 0.2 && < 0.3, diff --git a/src/Text/Pandoc/Readers/Haddock.hs b/src/Text/Pandoc/Readers/Haddock.hs index 35eaac0a9..67b3af2d3 100644 --- a/src/Text/Pandoc/Readers/Haddock.hs +++ b/src/Text/Pandoc/Readers/Haddock.hs @@ -131,7 +131,8 @@ docHToInlines isCode d' = DocIdentifier s -> B.codeWith ("",["haskell","identifier"],[]) $ T.pack s _ -> mempty DocIdentifierUnchecked s -> B.codeWith ("",["haskell","identifier"],[]) $ T.pack s - DocModule s -> B.codeWith ("",["haskell","module"],[]) $ T.pack s + DocModule s -> B.codeWith ("",["haskell","module"],[]) $ + T.pack (modLinkName s) DocWarning _ -> mempty -- TODO DocEmphasis d -> B.emph (docHToInlines isCode d) DocMonospaced (DocString s) -> B.code $ T.pack s diff --git a/stack.yaml b/stack.yaml index 16e5ad2cf..ea48fbb88 100644 --- a/stack.yaml +++ b/stack.yaml @@ -7,6 +7,7 @@ flags: packages: - '.' extra-deps: +- haddock-library-1.10.0 - hslua-1.3.0 - hslua-module-path-0.1.0 - jira-wiki-markup-1.4.0 |