From 5b4d239b852a3f8fd9dc4fef025faad6b575ec59 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Wed, 20 Mar 2013 10:17:36 -0700 Subject: Added OPML template, tests. Minor fixes to OPML writer. Improved OPML reader tests. --- tests/Tests/Old.hs | 4 +- tests/opml-reader.native | 2 +- tests/opml-reader.opml | 172 ++++++++++++++++++++++------------------------- tests/writer.opml | 72 ++++++++++++++++++++ 4 files changed, 158 insertions(+), 92 deletions(-) create mode 100644 tests/writer.opml (limited to 'tests') diff --git a/tests/Tests/Old.hs b/tests/Tests/Old.hs index c22fa9830..45c430c33 100644 --- a/tests/Tests/Old.hs +++ b/tests/Tests/Old.hs @@ -125,7 +125,9 @@ tests = [ testGroup "markdown" "mediawiki-reader.wiki" "mediawiki-reader.native" ] , testGroup "opml" - [ test "reader" ["-r", "opml", "-w", "native", "-s"] + [ test "basic" ["-r", "native", "-w", "opml", "--columns=78", "-s"] + "testsuite.native" "writer.opml" + , test "reader" ["-r", "opml", "-w", "native", "-s"] "opml-reader.opml" "opml-reader.native" ] , testGroup "other writers" $ map (\f -> testGroup f $ writerTests f) diff --git a/tests/opml-reader.native b/tests/opml-reader.native index 8a627c025..ddcb6d8d2 100644 --- a/tests/opml-reader.native +++ b/tests/opml-reader.native @@ -1,4 +1,4 @@ -Pandoc (Meta {docTitle = [Str "states.opml"], docAuthors = [[Str "Dave",Space,Str "Winer"]], docDate = [Str "Thu,",Space,Str "14",Space,Str "Jul",Space,Str "2005",Space,Str "23:41:05",Space,Str "GMT"]}) +Pandoc (Meta {docTitle = [Str "States"], docAuthors = [[Str "Dave",Space,Str "Winer"]], docDate = [Str "Thu,",Space,Str "14",Space,Str "Jul",Space,Str "2005",Space,Str "23:41:05",Space,Str "GMT"]}) [Header 1 ("",[],[]) [Str "United",Space,Str "States"] ,Header 2 ("",[],[]) [Str "Far",Space,Str "West"] ,Header 3 ("",[],[]) [Str "Alaska"] diff --git a/tests/opml-reader.opml b/tests/opml-reader.opml index 54dd592ea..18436e675 100644 --- a/tests/opml-reader.opml +++ b/tests/opml-reader.opml @@ -1,91 +1,83 @@ - + - - states.opml - Tue, 15 Mar 2005 16:35:45 GMT - Thu, 14 Jul 2005 23:41:05 GMT - Dave Winer - dave@scripting.com - 1, 6, 13, 16, 18, 20 - 1 - 106 - 106 - 558 - 479 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + States + Thu, 14 Jul 2005 23:41:05 GMT + Dave Winer + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/tests/writer.opml b/tests/writer.opml new file mode 100644 index 000000000..08d2a84ec --- /dev/null +++ b/tests/writer.opml @@ -0,0 +1,72 @@ + + + + Pandoc Test Suite + Mon, 17 Jul 2006 00:00:00 UTC + John MacFarlane ; Anonymous + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + -- cgit v1.2.3