@@ -145,7 +145,7 @@ where
146import Text.Pandoc.Definition
146import Text.Pandoc.Definition
147import Text.Pandoc.Options
147import Text.Pandoc.Options
148−import Text.Pandoc.Builder (Blocks)
148+import Text.Pandoc.Builder (Blocks, Inlines)
149import qualified Text.Pandoc.UTF8 as UTF8 (putStrLn)
149import qualified Text.Pandoc.UTF8 as UTF8 (putStrLn)
150import Text.Parsec
150import Text.Parsec
151import Text.Parsec.Pos (newPos)
151import Text.Parsec.Pos (newPos)
@@ -792,7 +792,7 @@ toKey = Key . map toLower . unwords . words
793type KeyTable = M.Map Key Target
793type KeyTable = M.Map Key Target
795−type SubstTable = M.Map Key Inline
795+type SubstTable = M.Map Key Inlines
797-- | Fail unless we're in "smart typography" mode.
797-- | Fail unless we're in "smart typography" mode.
798failUnlessSmart :: Parser [tok] ParserState ()
798failUnlessSmart :: Parser [tok] ParserState ()