Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Muse reader tests: more tests

Browse source 
Check that indented blocks that end in self-terminating blocks (such as block tags and verse) can be terminated by paragraphs.
This commit is contained in:
Alexander Krotov 2018-09-22 20:28:11 +03:00
parent 111e6ffa55
commit 389ffa3045
1 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
test/Tests/Readers/Muse.hs
View file

@ -762,6 +762,13 @@ tests =
, " > Baz"
] =?>
para ("Foo" <> note (para "Bar" <> lineBlock ["Baz"]))
, "Footnote ending in self-terminating element and followed by paragraph" =:
T.unlines [ "Foo[1]"
, ""
, "[1] > bar"
, "baz"
] =?>
para (str "Foo" <> note (lineBlock ["bar"])) <> para (str "baz")
, test emacsMuse "Emacs multiparagraph footnotes"
(T.unlines
[ "First footnote reference[1] and second footnote reference[2]."
@ -1170,6 +1177,11 @@ tests =
] =?>
bulletList [ lineBlock [ "foo" ] ] <> bulletList [ para "bar" ]
]
, "List ending in self-terminating element and followed by paragraph" =:
T.unlines [ " - > Foo"
, "bar"
] =?>
bulletList [lineBlock ["Foo"]] <> para (str "bar")
-- Test that definition list requires a leading space.
-- Emacs Muse does not require a space, we follow Amusewiki here.
, "Not a definition list" =: