aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-10-26 16:30:15 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-10-26 16:30:15 +0300
commit1ca320e249ab72a33e46ca1e73d36b1a818ce008 (patch)
treedd252aa8c3404c40545f7f24ca6bff34f2339cdd /test/Tests/Readers
parent74396c7f90d410a4198b39db672d1a410b16a289 (diff)
downloadpandoc-1ca320e249ab72a33e46ca1e73d36b1a818ce008.tar.gz
Muse reader: parse page breaks
Diffstat (limited to 'test/Tests/Readers')
-rw-r--r--test/Tests/Readers/Muse.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 36724b33c..492b5baaa 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -279,6 +279,14 @@ tests =
, "5 dashes is a horizontal rule" =: "-----" =?> horizontalRule
, "4 dashes with spaces is a horizontal rule" =: "---- " =?> horizontalRule
]
+ , testGroup "Page breaks"
+ [ "Page break" =:
+ " * * * * *" =?>
+ divWith ("", [], [("style", "page-break-before: always;")]) mempty
+ , "Page break with trailing space" =:
+ " * * * * * " =?>
+ divWith ("", [], [("style", "page-break-before: always;")]) mempty
+ ]
, testGroup "Paragraphs"
[ "Simple paragraph" =:
T.unlines [ "First line"