diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Readers/Muse.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs index c0da48586..3a3d7d864 100644 --- a/test/Tests/Readers/Muse.hs +++ b/test/Tests/Readers/Muse.hs @@ -10,6 +10,7 @@ import Tests.Helpers import Text.Pandoc import Text.Pandoc.Arbitrary () import Text.Pandoc.Builder +import Text.Pandoc.Shared (underlineSpan) -- import Text.Pandoc.Walk (walk) amuse :: Text -> Pandoc @@ -83,6 +84,9 @@ tests = "***strength***" =?> para (strong . emph $ "strength") + , test emacsMuse "Underline" + ("_Underline_" =?> para (underlineSpan "Underline")) + , "Superscript tag" =: "<sup>Superscript</sup>" =?> para (superscript "Superscript") , "Subscript tag" =: "<sub>Subscript</sub>" =?> para (subscript "Subscript") |