git.iko.soy/typeable/pandoc
on master help sign in
Add extra pair of test files for dokuwiki writer (#386)
2ae2fcdclaremacrae
tests/Tests/Old.hs+6−1
compare with master
unifiedsplit
@@ -124,6 +124,11 @@ tests = [ testGroup "markdown"
124 , test "reader" ["-r", "mediawiki", "-w", "native", "-s"]
124 , test "reader" ["-r", "mediawiki", "-w", "native", "-s"]
125 "mediawiki-reader.wiki" "mediawiki-reader.native"
125 "mediawiki-reader.wiki" "mediawiki-reader.native"
126 ]
126 ]
127+ , testGroup "dokuwiki"
128+ [ testGroup "writer" $ writerTests "dokuwiki"
129+ , test "writer-more" ["-r", "native", "-w", "dokuwiki", "-s"]
130+ "dokuwiki-writer.native" "dokuwiki-writer.dokuwiki"
131+ ]
127 , testGroup "opml"
132 , testGroup "opml"
128 [ test "basic" ["-r", "native", "-w", "opml", "--columns=78", "-s"]
133 [ test "basic" ["-r", "native", "-w", "opml", "--columns=78", "-s"]
129 "testsuite.native" "writer.opml"
134 "testsuite.native" "writer.opml"
@@ -136,7 +141,7 @@ tests = [ testGroup "markdown"
136 ]
141 ]
137 , testGroup "other writers" $ map (\f -> testGroup f $ writerTests f)
142 , testGroup "other writers" $ map (\f -> testGroup f $ writerTests f)
138 [ "opendocument" , "context" , "texinfo"
143 [ "opendocument" , "context" , "texinfo"
139− , "man" , "plain" , "rtf", "org", "asciidoc", "dokuwiki"
144+ , "man" , "plain" , "rtf", "org", "asciidoc"
140 ]
145 ]
141 ]
146 ]
142
147
tests/dokuwiki-writer.dokuwikinew file+1
@@ -0,0 +1 @@
1+hello // world
tests/dokuwiki-writer.nativenew file+1
@@ -0,0 +1 @@
1+[Para [Str "hello",Space,Str "//",Space,Str "world"]]