diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2012-09-27 16:44:49 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2012-09-27 16:44:49 -0700 |
| commit | 7633d519718240e67ae9c7b872be3e09fd55077b (patch) | |
| tree | 9f26665c45c014fb67e9966d69caa5f92bc69e89 /src | |
| parent | 35662e14a9fafcc7d4202cec75cac47b656bb53c (diff) | |
| download | pandoc-7633d519718240e67ae9c7b872be3e09fd55077b.tar.gz | |
Parsing: Changed type of stateSubstitutions to use Inlines.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Parsing.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs index 731375e38..7abec90a1 100644 --- a/src/Text/Pandoc/Parsing.hs +++ b/src/Text/Pandoc/Parsing.hs @@ -145,7 +145,7 @@ where import Text.Pandoc.Definition import Text.Pandoc.Options -import Text.Pandoc.Builder (Blocks) +import Text.Pandoc.Builder (Blocks, Inlines) import qualified Text.Pandoc.UTF8 as UTF8 (putStrLn) import Text.Parsec import Text.Parsec.Pos (newPos) @@ -792,7 +792,7 @@ toKey = Key . map toLower . unwords . words type KeyTable = M.Map Key Target -type SubstTable = M.Map Key Inline +type SubstTable = M.Map Key Inlines -- | Fail unless we're in "smart typography" mode. failUnlessSmart :: Parser [tok] ParserState () |