From 288065cfd44eb02f9ef4e6c9b901e14776246dbb Mon Sep 17 00:00:00 2001 From: Alexander Krotov Date: Mon, 22 Jan 2018 16:24:44 +0300 Subject: Muse writer: indent lists inside Div --- test/Tests/Writers/Muse.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'test') diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs index 158f80f67..ee4c76587 100644 --- a/test/Tests/Writers/Muse.hs +++ b/test/Tests/Writers/Muse.hs @@ -282,7 +282,9 @@ tests = [ testGroup "block elements" , " |+ Table 1 +|" ] ] - -- Div is trivial + , "div with bullet list" =: + divWith nullAttr (bulletList [para $ text "foo"]) =?> + unlines [ " - foo" ] -- Making sure bullets are indented -- Null is trivial ] , testGroup "inline elements" -- cgit v1.2.3