diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2019-07-13 20:54:26 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2019-07-14 18:22:52 +0300 |
| commit | 0713cb65bc6fcea0c950d1afcdfdce412a8b56d4 (patch) | |
| tree | 2b611ce16095dcf84db75c75eda22e1762ba71ef /test/Tests/Readers | |
| parent | f6c92c7523a4070f13fbf193ef80ad7ac63f6693 (diff) | |
| download | pandoc-0713cb65bc6fcea0c950d1afcdfdce412a8b56d4.tar.gz | |
Muse: add RTL support
Closes #5551
Diffstat (limited to 'test/Tests/Readers')
| -rw-r--r-- | test/Tests/Readers/Muse.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs index 426ba935d..87495eba1 100644 --- a/test/Tests/Readers/Muse.hs +++ b/test/Tests/Readers/Muse.hs @@ -236,6 +236,9 @@ tests = , "Class tag" =: "<class name=\"foo\">bar</class>" =?> para (spanWith ("", ["foo"], []) "bar") , "Class tag without name" =: "<class>foobar</class>" =?> para (spanWith ("", [], []) "foobar") + , "RTL" =: "<<<foo bar>>>" =?> para (spanWith ("", [], [("dir", "rtl")]) "foo bar") + , "LTR" =: ">>>foo bar<<<" =?> para (spanWith ("", [], [("dir", "ltr")]) "foo bar") + -- <em> tag should match with the last </em> tag, not verbatim one , "Nested \"</em>\" inside em tag" =: "<em>foo<verbatim></em></verbatim>bar</em>" =?> para (emph "foo</em>bar") |