diff options
Diffstat (limited to 'test/Tests/Writers')
-rw-r--r-- | test/Tests/Writers/AsciiDoc.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/ConTeXt.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/Docbook.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/Docx.hs | 12 | ||||
-rw-r--r-- | test/Tests/Writers/HTML.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/Markdown.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/Native.hs | 5 | ||||
-rw-r--r-- | test/Tests/Writers/Org.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/Plain.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/RST.hs | 6 | ||||
-rw-r--r-- | test/Tests/Writers/TEI.hs | 6 |
11 files changed, 35 insertions, 36 deletions
diff --git a/test/Tests/Writers/AsciiDoc.hs b/test/Tests/Writers/AsciiDoc.hs index 7103b838b..b4869d628 100644 --- a/test/Tests/Writers/AsciiDoc.hs +++ b/test/Tests/Writers/AsciiDoc.hs @@ -1,10 +1,10 @@ module Tests.Writers.AsciiDoc (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder asciidoc :: (ToPandoc a) => a -> String asciidoc = purely (writeAsciiDoc def{ writerWrapText = WrapNone }) . toPandoc diff --git a/test/Tests/Writers/ConTeXt.hs b/test/Tests/Writers/ConTeXt.hs index b3e12a571..cbcbe3b94 100644 --- a/test/Tests/Writers/ConTeXt.hs +++ b/test/Tests/Writers/ConTeXt.hs @@ -2,10 +2,10 @@ module Tests.Writers.ConTeXt (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder context :: (ToPandoc a) => a -> String context = purely (writeConTeXt def) . toPandoc diff --git a/test/Tests/Writers/Docbook.hs b/test/Tests/Writers/Docbook.hs index f34f2495c..5b3270139 100644 --- a/test/Tests/Writers/Docbook.hs +++ b/test/Tests/Writers/Docbook.hs @@ -2,10 +2,10 @@ module Tests.Writers.Docbook (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder docbook :: (ToPandoc a) => a -> String docbook = docbookWithOpts def{ writerWrapText = WrapNone } diff --git a/test/Tests/Writers/Docx.hs b/test/Tests/Writers/Docx.hs index fd320d224..be32518bf 100644 --- a/test/Tests/Writers/Docx.hs +++ b/test/Tests/Writers/Docx.hs @@ -1,14 +1,14 @@ module Tests.Writers.Docx (tests) where -import Text.Pandoc.Options -import Text.Pandoc.Readers.Native -import Text.Pandoc.Definition -import Tests.Helpers +import System.FilePath ((</>)) import Test.Framework +import Tests.Helpers +import Text.Pandoc.Class (runIOorExplode) +import Text.Pandoc.Definition +import Text.Pandoc.Options import Text.Pandoc.Readers.Docx +import Text.Pandoc.Readers.Native import Text.Pandoc.Writers.Docx -import System.FilePath ((</>)) -import Text.Pandoc.Class (runIOorExplode) type Options = (WriterOptions, ReaderOptions) diff --git a/test/Tests/Writers/HTML.hs b/test/Tests/Writers/HTML.hs index 45de2b042..95450625c 100644 --- a/test/Tests/Writers/HTML.hs +++ b/test/Tests/Writers/HTML.hs @@ -2,10 +2,10 @@ module Tests.Writers.HTML (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder html :: (ToPandoc a) => a -> String html = purely (writeHtml4String def{ writerWrapText = WrapNone }) . toPandoc diff --git a/test/Tests/Writers/Markdown.hs b/test/Tests/Writers/Markdown.hs index abefe27d5..80ef45170 100644 --- a/test/Tests/Writers/Markdown.hs +++ b/test/Tests/Writers/Markdown.hs @@ -3,10 +3,10 @@ module Tests.Writers.Markdown (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder defopts :: WriterOptions defopts = def{ writerExtensions = pandocExtensions } diff --git a/test/Tests/Writers/Native.hs b/test/Tests/Writers/Native.hs index 88bad7944..535c761f5 100644 --- a/test/Tests/Writers/Native.hs +++ b/test/Tests/Writers/Native.hs @@ -1,10 +1,9 @@ module Tests.Writers.Native (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () p_write_rt :: Pandoc -> Bool p_write_rt d = diff --git a/test/Tests/Writers/Org.hs b/test/Tests/Writers/Org.hs index e2c58327b..6943081d3 100644 --- a/test/Tests/Writers/Org.hs +++ b/test/Tests/Writers/Org.hs @@ -2,10 +2,10 @@ module Tests.Writers.Org (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder infix 4 =: (=:) :: (ToString a, ToPandoc a) diff --git a/test/Tests/Writers/Plain.hs b/test/Tests/Writers/Plain.hs index bead6857c..854ed6b12 100644 --- a/test/Tests/Writers/Plain.hs +++ b/test/Tests/Writers/Plain.hs @@ -2,10 +2,10 @@ module Tests.Writers.Plain (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder infix 4 =: diff --git a/test/Tests/Writers/RST.hs b/test/Tests/Writers/RST.hs index dd55580c9..1b250f737 100644 --- a/test/Tests/Writers/RST.hs +++ b/test/Tests/Writers/RST.hs @@ -2,10 +2,10 @@ module Tests.Writers.RST (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder infix 4 =: (=:) :: (ToString a, ToPandoc a) diff --git a/test/Tests/Writers/TEI.hs b/test/Tests/Writers/TEI.hs index 703f565bb..713309784 100644 --- a/test/Tests/Writers/TEI.hs +++ b/test/Tests/Writers/TEI.hs @@ -2,10 +2,10 @@ module Tests.Writers.TEI (tests) where import Test.Framework -import Text.Pandoc.Builder -import Text.Pandoc import Tests.Helpers -import Text.Pandoc.Arbitrary() +import Text.Pandoc +import Text.Pandoc.Arbitrary () +import Text.Pandoc.Builder {- "my test" =: X =?> Y |