File tree Expand file tree Collapse file tree 1 file changed +3
-2
lines changed
Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Original file line number Diff line number Diff line change @@ -8,6 +8,7 @@ build-depends:
88 , text >=2.1
99-}
1010{-# LANGUAGE LambdaCase #-}
11+ {-# LANGUAGE OverloadedStrings #-}
1112
1213module Main (main ) where
1314
@@ -22,7 +23,7 @@ import qualified Distribution.Types.PackageDescription as PackageDescription
2223import Distribution.Utils.ShortText (fromShortText )
2324import System.IO (hPutStrLn , stderr )
2425import Text.Pandoc (runIOorExplode )
25- import Text.Pandoc.Extensions (githubMarkdownExtensions )
26+ import Text.Pandoc.Extensions (getDefaultExtensions )
2627import Text.Pandoc.Options (ReaderOptions (.. ), WriterOptions (.. ),
2728 def )
2829import Text.Pandoc.Readers (readHaddock )
@@ -45,6 +46,6 @@ main = do
4546 runIOorExplode $ do
4647 doc1 <- readHaddock def description
4748 let doc2 = headerShift 1 doc1
48- writeMarkdown def{writerExtensions = githubMarkdownExtensions } doc2
49+ writeMarkdown def{writerExtensions = getDefaultExtensions " gfm " } doc2
4950 let readme = T. unlines [readmeHeaderContent, body]
5051 TIO. writeFile " README.md" readme
You can’t perform that action at this time.
0 commit comments