aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-10-27 20:28:29 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2017-10-27 20:28:29 -0700
commitff16db1aa306113132cc6cfaa70791a0db75e0a5 (patch)
treeb5a016232c62645a1276c30eb4b69356662c060e /test/Tests/Readers
parentbf54a6335a0d2ae3fdf03e60a84448476f651d59 (diff)
downloadpandoc-ff16db1aa306113132cc6cfaa70791a0db75e0a5.tar.gz
Automatic reformating by stylish-haskell.
Diffstat (limited to 'test/Tests/Readers')
-rw-r--r--test/Tests/Readers/Docx.hs8
-rw-r--r--test/Tests/Readers/HTML.hs2
-rw-r--r--test/Tests/Readers/LaTeX.hs4
-rw-r--r--test/Tests/Readers/Odt.hs6
4 files changed, 10 insertions, 10 deletions
diff --git a/test/Tests/Readers/Docx.hs b/test/Tests/Readers/Docx.hs
index 71ebb6cce..421acaa8b 100644
--- a/test/Tests/Readers/Docx.hs
+++ b/test/Tests/Readers/Docx.hs
@@ -1,18 +1,18 @@
module Tests.Readers.Docx (tests) where
import Codec.Archive.Zip
-import qualified Data.ByteString.Lazy as B
import qualified Data.ByteString as BS
-import qualified Data.Text as T
+import qualified Data.ByteString.Lazy as B
import qualified Data.Map as M
+import qualified Data.Text as T
+import System.IO.Unsafe
import Test.Tasty
import Test.Tasty.HUnit
import Tests.Helpers
import Text.Pandoc
-import Text.Pandoc.UTF8 as UTF8
import qualified Text.Pandoc.Class as P
import Text.Pandoc.MediaBag (MediaBag, lookupMedia, mediaDirectory)
-import System.IO.Unsafe -- TODO temporary
+import Text.Pandoc.UTF8 as UTF8
-- We define a wrapper around pandoc that doesn't normalize in the
-- tests. Since we do our own normalization, we want to make sure
diff --git a/test/Tests/Readers/HTML.hs b/test/Tests/Readers/HTML.hs
index 00a8cfc90..70f33d2b2 100644
--- a/test/Tests/Readers/HTML.hs
+++ b/test/Tests/Readers/HTML.hs
@@ -1,12 +1,12 @@
{-# LANGUAGE OverloadedStrings #-}
module Tests.Readers.HTML (tests) where
+import Data.Text (Text)
import Test.Tasty
import Tests.Helpers
import Text.Pandoc
import Text.Pandoc.Arbitrary ()
import Text.Pandoc.Builder
-import Data.Text (Text)
html :: Text -> Pandoc
html = purely $ readHtml def
diff --git a/test/Tests/Readers/LaTeX.hs b/test/Tests/Readers/LaTeX.hs
index ba9b8e289..99b49fd45 100644
--- a/test/Tests/Readers/LaTeX.hs
+++ b/test/Tests/Readers/LaTeX.hs
@@ -1,13 +1,13 @@
{-# LANGUAGE OverloadedStrings #-}
module Tests.Readers.LaTeX (tests) where
+import Data.Text (Text)
+import qualified Data.Text as T
import Test.Tasty
import Tests.Helpers
import Text.Pandoc
import Text.Pandoc.Arbitrary ()
import Text.Pandoc.Builder
-import Data.Text (Text)
-import qualified Data.Text as T
latex :: Text -> Pandoc
latex = purely $ readLaTeX def{
diff --git a/test/Tests/Readers/Odt.hs b/test/Tests/Readers/Odt.hs
index eed3a33b0..4b7058cf9 100644
--- a/test/Tests/Readers/Odt.hs
+++ b/test/Tests/Readers/Odt.hs
@@ -1,15 +1,15 @@
module Tests.Readers.Odt (tests) where
import Control.Monad (liftM)
-import qualified Data.ByteString.Lazy as B
import qualified Data.ByteString as BS
-import qualified Text.Pandoc.UTF8 as UTF8
+import qualified Data.ByteString.Lazy as B
import qualified Data.Map as M
import Data.Text (unpack)
+import System.IO.Unsafe (unsafePerformIO)
import Test.Tasty
import Tests.Helpers
import Text.Pandoc
-import System.IO.Unsafe (unsafePerformIO) -- TODO temporary
+import qualified Text.Pandoc.UTF8 as UTF8
defopts :: ReaderOptions
defopts = def{ readerExtensions = getDefaultExtensions "odt" }