From 7963edd223159a6d4633cd383339bed7f4617d11 Mon Sep 17 00:00:00 2001
From: David Waern <david.waern@gmail.com>
Date: Fri, 11 Apr 2008 16:00:45 +0000
Subject: Use the in-place haddock when running tests

---
 tests/runtests.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/runtests.hs b/tests/runtests.hs
index d3fa71de..7fadf8a4 100644
--- a/tests/runtests.hs
+++ b/tests/runtests.hs
@@ -61,7 +61,7 @@ testDir libdir dir = do
   let mods' = map (dir </>) mods
   let outdir = "output" </> dir
   createDirectoryIfMissing True outdir
-  code <- system $ printf "haddock -B %s -o %s -h --optghc=-fglasgow-exts %s" libdir outdir (unwords mods')
+  code <- system $ printf "../dist/build/haddock/haddock -B %s -o %s -h --optghc=-fglasgow-exts %s" libdir outdir (unwords mods')
   unless (code == ExitSuccess) $ error "Haddock run failed! Exiting."
   check mods'
   walkDirs libdir dir
-- 
cgit v1.2.3