git.iko.soy/typeable/pandoc
on master help sign in
Muse reader: add ordered list test
0b63ac2Alexander Krotov
test/Tests/Readers/Muse.hs+24−12
@@ -537,23 +537,35 @@ tests =
537 ]
537 ]
538 , testGroup "Lists"
538 , testGroup "Lists"
539 [ "Bullet list" =:
539 [ "Bullet list" =:
540− T.unlines
540+ T.unlines
541 [ " - Item1"
541 [ " - Item1"
542 , ""
542 , ""
543 , " - Item2"
543 , " - Item2"
544 ] =?>
544 ] =?>
545− bulletList [ para "Item1"
545+ bulletList [ para "Item1"
546− , para "Item2"
546+ , para "Item2"
547− ]
547+ ]
548 , "Ordered list" =:
548 , "Ordered list" =:
549− T.unlines
549+ T.unlines
550− [ " 1. Item1"
550+ [ " 1. Item1"
551− , ""
551+ , ""
552− , " 2. Item2"
552+ , " 2. Item2"
553+ ] =?>
554+ orderedListWith (1, Decimal, Period) [ para "Item1"
555+ , para "Item2"
556+ ]
557+ , "Ordered list with implicit numbers" =:
558+ T.unlines
559+ [ " 1. Item1"
560+ , ""
561+ , " 1. Item2"
562+ , ""
563+ , " 1. Item3"
553− ] =?>
564+ ] =?>
554− orderedListWith (1, Decimal, Period) [ para "Item1"
565+ orderedListWith (1, Decimal, Period) [ para "Item1"
555− , para "Item2"
566+ , para "Item2"
567+ , para "Item3"
556− ]
568+ ]
557 , testGroup "Nested lists"
569 , testGroup "Nested lists"
558 [ "Nested list" =:
570 [ "Nested list" =:
559 T.unlines
571 T.unlines