summaryrefslogtreecommitdiff
path: root/tests/Tests/Old.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2012-09-25 19:54:21 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2012-09-25 19:54:21 -0700
commit6ad7ac1239cb384bf830b1692991030735f43e89 (patch)
treeb3f3a9399aaecb9acd7e1fa6eccc2a26bdf49191 /tests/Tests/Old.hs
parent833977416ff8cbdcf0ebd8a6a135d7ef13fdbd73 (diff)
Removed need for utf8-string package.
* Depend on text. * Expose Text.Pandoc.UTF8. * Text.Pandoc.UTF8 now exports toString, fromString, toStringLazy, fromStringLazy. * These are used instead of the old utf8-string functions.
Diffstat (limited to 'tests/Tests/Old.hs')
-rw-r--r--tests/Tests/Old.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/Tests/Old.hs b/tests/Tests/Old.hs
index 15b6b354e..484d61561 100644
--- a/tests/Tests/Old.hs
+++ b/tests/Tests/Old.hs
@@ -16,11 +16,11 @@ import Text.Pandoc.Writers.Native ( writeNative )
import Text.Pandoc.Readers.Native ( readNative )
import Prelude hiding ( readFile )
import qualified Data.ByteString.Lazy as B
-import Data.ByteString.Lazy.UTF8 (toString)
+import Text.Pandoc.UTF8 (toStringLazy)
import Text.Printf
readFileUTF8 :: FilePath -> IO String
-readFileUTF8 f = B.readFile f >>= return . toString
+readFileUTF8 f = B.readFile f >>= return . toStringLazy
pandocPath :: FilePath
pandocPath = ".." </> "dist" </> "build" </> "pandoc" </> "pandoc"