From 2a075e9d7a31303efa823f1779c2b32f9fb8a14f Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Wed, 15 Dec 2010 18:07:36 -0800
Subject: [PATCH] test-pandoc: removed need to depend on MissingH.
---
pandoc.cabal | 4 ++--
src/test-pandoc.hs | 4 ++--
2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/pandoc.cabal b/pandoc.cabal
index eb400d1c4..312111afb 100644
--- a/pandoc.cabal
+++ b/pandoc.cabal
@@ -291,5 +291,5 @@ Executable test-pandoc
Buildable: False
else
Ghc-Options: -Wall
- Build-Depends: base >= 4 && < 5, Diff, MissingH
-
+ Build-Depends: base >= 4 && < 5, Diff
+ Other-Modules: Text.Pandoc.Shared
diff --git a/src/test-pandoc.hs b/src/test-pandoc.hs
index 2c7bc0749..b475711d2 100644
--- a/src/test-pandoc.hs
+++ b/src/test-pandoc.hs
@@ -21,7 +21,7 @@ import System.Environment
import System.Exit
import Text.Printf
import Data.Algorithm.Diff
-import Data.String.Utils ( replace )
+import Text.Pandoc.Shared ( substitute )
import Prelude hiding ( readFile )
import qualified Data.ByteString.Lazy as B
import Data.ByteString.Lazy.UTF8 (toString, fromString)
@@ -167,7 +167,7 @@ runLatexCitationTests o n
where
o' = o ++ ["--" ++ n]
f = n ++ "-citations.latex"
- normalize = replace "\160" " " . replace "\8211" "-"
+ normalize = substitute "\160" " " . substitute "\8211" "-"
rt = runTestWithNormalize normalize
runWriterTest :: String -> IO Bool