diff options
| author | Clare Macrae <github@cfmacrae.fastmail.co.uk> | 2014-07-02 22:26:11 +0100 |
|---|---|---|
| committer | Clare Macrae <github@cfmacrae.fastmail.co.uk> | 2014-07-02 22:26:11 +0100 |
| commit | 7647d87657b324b268e7d1bf1b6fe9056312d55e (patch) | |
| tree | aaaa4073e2f97c7a4a23425840b2c1d0bf6a0418 | |
| parent | 23d71b13e7b462229427e2437a8dd9c8f72d72f1 (diff) | |
| download | pandoc-7647d87657b324b268e7d1bf1b6fe9056312d55e.tar.gz | |
DokuWiki writer: Add new test showing that span swallows content.
| -rw-r--r-- | tests/Tests/Old.hs | 2 | ||||
| -rw-r--r-- | tests/dokuwiki.inline_formatting.dokuwiki | 9 | ||||
| -rw-r--r-- | tests/dokuwiki.inline_formatting.native | 5 |
3 files changed, 16 insertions, 0 deletions
diff --git a/tests/Tests/Old.hs b/tests/Tests/Old.hs index 44ed9f53a..628951423 100644 --- a/tests/Tests/Old.hs +++ b/tests/Tests/Old.hs @@ -128,6 +128,8 @@ tests = [ testGroup "markdown" [ testGroup "writer" $ writerTests "dokuwiki" , test "writer-more" ["-r", "native", "-w", "dokuwiki", "-s"] "dokuwiki-writer.native" "dokuwiki-writer.dokuwiki" + , test "writer-inline_formatting" ["-r", "native", "-w", "dokuwiki", "-s"] + "dokuwiki.inline_formatting.native" "dokuwiki.inline_formatting.dokuwiki" ] , testGroup "opml" [ test "basic" ["-r", "native", "-w", "opml", "--columns=78", "-s"] diff --git a/tests/dokuwiki.inline_formatting.dokuwiki b/tests/dokuwiki.inline_formatting.dokuwiki new file mode 100644 index 000000000..2faf49eec --- /dev/null +++ b/tests/dokuwiki.inline_formatting.dokuwiki @@ -0,0 +1,9 @@ +Regular text //italics// **bold //bold italics//**. + +This is Small Caps, and this is <del>strikethrough</del>. + +Some people use . + +Above the line is <sup>superscript</sup> and below the line is <sub>subscript</sub>. + +A line\\ break. diff --git a/tests/dokuwiki.inline_formatting.native b/tests/dokuwiki.inline_formatting.native new file mode 100644 index 000000000..dc8a3d19a --- /dev/null +++ b/tests/dokuwiki.inline_formatting.native @@ -0,0 +1,5 @@ +[Para [Str "Regular",Space,Str "text",Space,Emph [Str "italics"],Space,Strong [Str "bold",Space,Emph [Str "bold",Space,Str "italics"]],Str "."] +,Para [Str "This",Space,Str "is",Space,SmallCaps [Str "Small",Space,Str "Caps"],Str ",",Space,Str "and",Space,Str "this",Space,Str "is",Space,Strikeout [Str "strikethrough"],Str "."] +,Para [Str "Some",Space,Str "people",Space,Str "use",Space,Span ("",[],[("underline","single")]) [Str "single",Space,Str "underlines",Space,Str "for",Space,Emph [Str "emphasis"]],Str "."] +,Para [Str "Above",Space,Str "the",Space,Str "line",Space,Str "is",Space,Superscript [Str "superscript"],Space,Str "and",Space,Str "below",Space,Str "the",Space,Str "line",Space,Str "is",Space,Subscript [Str "subscript"],Str "."] +,Para [Str "A",Space,Str "line",LineBreak,Str "break."]] |