git.iko.soy/typeable/pandoc
on master help sign in
Muse reader: test that two blank lines after verse can separate list items
6c45f8cAlexander Krotov
test/Tests/Readers/Muse.hs+21
compare with master
unifiedsplit
@@ -929,6 +929,27 @@ tests =
929 , " - bar"
929 , " - bar"
930 ] =?>
930 ] =?>
931 bulletList [ blockQuote $ para "foo" ] <> bulletList [ para "bar" ]
931 bulletList [ blockQuote $ para "foo" ] <> bulletList [ para "bar" ]
932+ , "No blank line after verse" =:
933+ T.unlines
934+ [ " - > foo"
935+ , " - bar"
936+ ] =?>
937+ bulletList [ lineBlock [ "foo" ], para "bar" ]
938+ , "One blank line after verse" =:
939+ T.unlines
940+ [ " - > foo"
941+ , ""
942+ , " - bar"
943+ ] =?>
944+ bulletList [ lineBlock [ "foo" ], para "bar" ]
945+ , "Two blank lines after verse" =:
946+ T.unlines
947+ [ " - > foo"
948+ , ""
949+ , ""
950+ , " - bar"
951+ ] =?>
952+ bulletList [ lineBlock [ "foo" ] ] <> bulletList [ para "bar" ]
932 ]
953 ]
933 -- Test that definition list requires a leading space.
954 -- Test that definition list requires a leading space.
934 -- Emacs Muse does not require a space, we follow Amusewiki here.
955 -- Emacs Muse does not require a space, we follow Amusewiki here.