diff options
Diffstat (limited to 'test/Tests/Readers/Muse.hs')
-rw-r--r-- | test/Tests/Readers/Muse.hs | 8 |
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" |