diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2018-01-19 01:41:16 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-01-19 01:50:17 +0300 |
| commit | 19d257622356e603d56f3d4350b586420ed63dcb (patch) | |
| tree | 39acc4fc83ad4bf66ed67a4ba4e7d1acc315b09a /test/Tests/Readers/Muse.hs | |
| parent | 7e2c75c8653eb9ec64a19ac7d6f4677936fbb13b (diff) | |
| download | pandoc-19d257622356e603d56f3d4350b586420ed63dcb.tar.gz | |
Muse reader: parse definition list terms without parseFromString
Diffstat (limited to 'test/Tests/Readers/Muse.hs')
| -rw-r--r-- | test/Tests/Readers/Muse.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs index edbb3b290..198b95fc5 100644 --- a/test/Tests/Readers/Muse.hs +++ b/test/Tests/Readers/Muse.hs @@ -924,6 +924,8 @@ tests = definitionList [ ("foo", [ para "bar" ]) ] , "Definition list term with emphasis" =: " *Foo* :: bar\n" =?> definitionList [ (emph "Foo", [ para "bar" ]) ] + , "Definition list term with :: inside code" =: " foo <code> :: </code> :: bar <code> :: </code> baz\n" =?> + definitionList [ ("foo " <> code " :: ", [ para $ "bar " <> code " :: " <> " baz" ]) ] , "Multi-line definition lists" =: T.unlines [ " First term :: Definition of first term" |