diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2018-03-07 20:10:19 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-03-07 20:10:19 +0300 |
| commit | 1884ee60838ffeac090cafc9cf7fe2e44ad33636 (patch) | |
| tree | 60f92152a1733e180d267e7bee6a1620a0881546 /test/Tests/Writers/Muse.hs | |
| parent | ff8e59a17412e7a083ab5ce53a1af2db59025a44 (diff) | |
| download | pandoc-1884ee60838ffeac090cafc9cf7fe2e44ad33636.tar.gz | |
Muse writer: replace smallcaps with emphasis before normalization
Diffstat (limited to 'test/Tests/Writers/Muse.hs')
| -rw-r--r-- | test/Tests/Writers/Muse.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs index bbcb3dc61..509c20401 100644 --- a/test/Tests/Writers/Muse.hs +++ b/test/Tests/Writers/Muse.hs @@ -328,6 +328,7 @@ tests = [ testGroup "block elements" , "superscript" =: superscript (text "foo") =?> "<sup>foo</sup>" , "subscript" =: subscript (text "foo") =?> "<sub>foo</sub>" , "smallcaps" =: smallcaps (text "foo") =?> "<em>foo</em>" + , "smallcaps near emphasis" =: emph (str "foo") <> smallcaps (str "bar") =?> "<em>foobar</em>" , "single quoted" =: singleQuoted (text "foo") =?> "‘foo’" , "double quoted" =: doubleQuoted (text "foo") =?> "“foo”" -- Cite is trivial |