diff --git a/html-test/run.lhs b/html-test/run.lhs
index 153ab32cf6a662176ba7e02d46f0c0f34ddd50b1..a8664363e10f12e294f94f0a1ae014da9b1b5a7a 100755
--- a/html-test/run.lhs
+++ b/html-test/run.lhs
@@ -41,7 +41,7 @@ main = do
 test :: IO ()
 test = do
   x <- doesFileExist haddockPath
-  unless x $ die "you need to run 'cabal build' successfully first"
+  unless x $ System.Exit.die "you need to run 'cabal build' successfully first"
 
   contents <- getDirectoryContents testDir
   args <- getArgs
diff --git a/latex-test/run.lhs b/latex-test/run.lhs
index 423dc6fd1736c5bf207b1d2692ac21e4dc8f8fd2..c1d48d975165dc4446735b93ce9b34cc4111e63f 100755
--- a/latex-test/run.lhs
+++ b/latex-test/run.lhs
@@ -41,7 +41,7 @@ main = do
 test :: IO ()
 test = do
   x <- doesFileExist haddockPath
-  unless x $ die "you need to run 'cabal build' successfully first"
+  unless x $ System.Exit.die "you need to run 'cabal build' successfully first"
 
   contents <- getDirectoryContents testDir