git.iko.soy/typeable/pandoc
on master help sign in
Update man reader tests.
commit400e87df1d2fd500d8fc5403ff9a48662c198cce authorJohn MacFarlane <jgm@berkeley.edu> dateThu 18 Oct 2018, 23:53 (8 years ago) parenta49cd34
3 files changed+30−32
test/Tests/Readers/Man.hs+2−2 test/man-reader.man+4−6 test/man-reader.native+24−24
test/Tests/Readers/Man.hs+2−2
@@ -56,7 +56,7 @@ tests = [
5656 =?> (para $ str "ab")
5757 , "replace" =:
5858 "\\-\\ \\\\\\[lq]\\[rq]\\[em]\\[en]\\*(lq\\*(rq"
59− =?> (para $ str "- \\“”—–«»")
59+ =?> (para $ str "- \\“”—–“”")
6060 , "replace2" =:
6161 "\\t\\e\\`\\^\\|\\'"
6262 =?> (para $ str "\t\\` `")
@@ -65,7 +65,7 @@ tests = [
6565 "bullet" =:
6666 ".IP\nfirst\n.IP\nsecond"
6767 =?> bulletList [plain $ str "first", plain $ str "second"]
68− , "odrered" =:
68+ , "ordered" =:
6969 ".IP 1 a\nfirst\n.IP 2 a\nsecond"
7070 =?> orderedListWith (1,Decimal,DefaultDelim) [plain $ str "first", plain $ str "second"]
7171 , "upper" =:
test/man-reader.man+4−6
@@ -49,10 +49,10 @@ Code:
4949.IP
5050.nf
5151\f[C]
52−\-\-\-\-\ (should\ be\ four\ hyphens)
52+\-\-\-\- (should be four hyphens)
5353
54−sub\ status\ {
55−\ \ \ \ print\ "working";
54+sub status {
55+ print "working";
5656}
5757
5858\f[]
@@ -62,9 +62,7 @@ And:
6262.IP
6363.nf
6464\f[C]
65−\tthis\ code\ line is\ indented\ by\ one\ tab
66−
67−These\ should\ not\ be\ escaped:\ \ \\$\ \\\\\ \\>\ \\[\ \\{
65+\tthis code line is indented by one tab
6866\f[]
6967.fi
7068.PP
test/man-reader.native+24−24
@@ -14,62 +14,62 @@ Pandoc (Meta {unMeta = fromList [("title",MetaString "Pandoc Man tests")]})
1414,Para [Str " * * * * *"]
1515,Header 2 ("",[],[]) [Str "Block",Space,Str "Quotes"]
1616,Para [Str "Code in a block quote:"]
17−,CodeBlock ("",[],[]) "\nsub status {\n print \"working\";\n}\n"
17+,CodeBlock ("",[],[]) "\nsub status {\n print \"working\";\n}"
1818,Para [Str "A list:"]
19−,OrderedList (1,Decimal,DefaultDelim)
19+,OrderedList (1,Decimal,Period)
2020 [[Plain [Str "item one"]]
2121 ,[Plain [Str "item two"]]]
2222,Header 2 ("",[],[]) [Str "Code",Space,Str "Blocks"]
2323,Para [Str "Code:"]
24−,CodeBlock ("",[],[]) "\n---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n\n"
24+,CodeBlock ("",[],[]) "\n---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n"
2525,Para [Str "And:"]
26−,CodeBlock ("",[],[]) "\n\tthis code line is indented by one tab\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{\n"
26+,CodeBlock ("",[],[]) "\n\tthis code line is indented by one tab"
2727,Para [Str " * * * * *"]
2828,Header 2 ("",[],[]) [Str "Lists"]
2929,Header 3 ("",[],[]) [Str "Unordered"]
3030,Para [Str "Asterisks:"]
3131,BulletList
32− [[Plain [Str "",Space,Str "asterisk 1"]]
33− ,[Plain [Str "",Space,Str "asterisk 2"]]
34− ,[Plain [Str "",Space,Str "asterisk 3"]]]
32+ [[Plain [Str "asterisk 1"]]
33+ ,[Plain [Str "asterisk 2"]]
34+ ,[Plain [Str "asterisk 3"]]]
3535,Header 3 ("",[],[]) [Str "Ordered"]
36−,OrderedList (1,Decimal,DefaultDelim)
36+,OrderedList (1,Decimal,Period)
3737 [[Plain [Str "First"]]
3838 ,[Plain [Str "Second"]]
3939 ,[Plain [Str "Third"]]]
4040,Header 3 ("",[],[]) [Str "Nested"]
4141,BulletList
42− [[Plain [Str "",Space,Str "Tab"]
42+ [[Plain [Str "Tab"]
4343 ,BulletList
44− [[Plain [Str "",Space,Str "Tab"]
44+ [[Plain [Str "Tab"]
4545 ,BulletList
46− [[Plain [Str "",Space,Str "Tab"]]]]]]]
46+ [[Plain [Str "Tab"]]]]]]]
4747,Para [Str "Here's another:"]
48−,OrderedList (1,Decimal,DefaultDelim)
48+,OrderedList (1,Decimal,Period)
4949 [[Plain [Str "First"]]
5050 ,[Plain [Str "Second:"]
5151 ,BulletList
52− [[Plain [Str "",Space,Str "Fee"]]
53− ,[Plain [Str "",Space,Str "Fie"]]
54− ,[Plain [Str "",Space,Str "Foe"]]]]
52+ [[Plain [Str "Fee"]]
53+ ,[Plain [Str "Fie"]]
54+ ,[Plain [Str "Foe"]]]]
5555 ,[Plain [Str "Third"]]]
5656,Para [Str "Same thing:"]
57−,OrderedList (1,Decimal,DefaultDelim)
57+,OrderedList (1,Decimal,Period)
5858 [[Plain [Str "First"]]
5959 ,[Plain [Str "Second:"]
6060 ,BulletList
61− [[Plain [Str "",Space,Str "Fee"]]
62− ,[Plain [Str "",Space,Str "Fie"]]
63− ,[Plain [Str "",Space,Str "Foe"]]]]
61+ [[Plain [Str "Fee"]]
62+ ,[Plain [Str "Fie"]]
63+ ,[Plain [Str "Foe"]]]]
6464 ,[Plain [Str "Third"]]]
6565,Header 3 ("",[],[]) [Str "different",Space,Str "styles:"]
66−,OrderedList (1,UpperAlpha,DefaultDelim)
66+,OrderedList (1,UpperAlpha,Period)
6767 [[Plain [Str "Upper Alpha"]
68− ,OrderedList (1,UpperAlpha,DefaultDelim)
68+ ,OrderedList (1,UpperRoman,Period)
6969 [[Plain [Str "Upper Roman."]
70− ,BulletList
71− [[Plain [Str "(6)",Space,Str "Decimal start with 6"]
72− ,OrderedList (1,LowerAlpha,DefaultDelim)
70+ ,OrderedList (6,Decimal,TwoParens)
71+ [[Plain [Str "Decimal start with 6"]
72+ ,OrderedList (3,LowerAlpha,OneParen)
7373 [[Plain [Str "Lower alpha with paren"]]]]]]]]]
7474,Para [Str " * * * * *"]
7575,Header 2 ("",[],[]) [Str "Special",Space,Str "Characters"]