@@ -145,7 +145,7 @@ where
145145
146146import Text.Pandoc.Definition
147147import Text.Pandoc.Options
148−import Text.Pandoc.Builder (Blocks)
148+import Text.Pandoc.Builder (Blocks, Inlines)
149149import qualified Text.Pandoc.UTF8 as UTF8 (putStrLn)
150150import Text.Parsec
151151import Text.Parsec.Pos (newPos)
@@ -792,7 +792,7 @@ toKey = Key . map toLower . unwords . words
792792
793793type KeyTable = M.Map Key Target
794794
795−type SubstTable = M.Map Key Inline
795+type SubstTable = M.Map Key Inlines
796796
797797-- | Fail unless we're in "smart typography" mode.
798798failUnlessSmart :: Parser [tok] ParserState ()