git.iko.soy/typeable/pandoc
on master help sign in
Muse reader tests: more tests

Check that indented blocks that end in self-terminating blocks (such as block tags and verse) can be terminated by paragraphs.

commit389ffa3045cfc1a2530153172b7a1f14876033c4 authorAlexander Krotov <ilabdsf@gmail.com> dateSat 22 Sep 2018, 20:28 (8 years ago) parent111e6ff
1 file changed+12
compare with master
unifiedsplit
test/Tests/Readers/Muse.hs+12
test/Tests/Readers/Muse.hs+12
@@ -762,6 +762,13 @@ tests =
762762 , " > Baz"
763763 ] =?>
764764 para ("Foo" <> note (para "Bar" <> lineBlock ["Baz"]))
765+ , "Footnote ending in self-terminating element and followed by paragraph" =:
766+ T.unlines [ "Foo[1]"
767+ , ""
768+ , "[1] > bar"
769+ , "baz"
770+ ] =?>
771+ para (str "Foo" <> note (lineBlock ["bar"])) <> para (str "baz")
765772 , test emacsMuse "Emacs multiparagraph footnotes"
766773 (T.unlines
767774 [ "First footnote reference[1] and second footnote reference[2]."
@@ -1170,6 +1177,11 @@ tests =
11701177 ] =?>
11711178 bulletList [ lineBlock [ "foo" ] ] <> bulletList [ para "bar" ]
11721179 ]
1180+ , "List ending in self-terminating element and followed by paragraph" =:
1181+ T.unlines [ " - > Foo"
1182+ , "bar"
1183+ ] =?>
1184+ bulletList [lineBlock ["Foo"]] <> para (str "bar")
11731185 -- Test that definition list requires a leading space.
11741186 -- Emacs Muse does not require a space, we follow Amusewiki here.
11751187 , "Not a definition list" =: