From 6ecc5b96a9854382682fd1c9231133c08dae7b17 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Tue, 14 Mar 2017 17:05:36 +0100
Subject: Use tasty for tests rather than test-framework.

---
 test/test-pandoc.hs | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

(limited to 'test/test-pandoc.hs')

diff --git a/test/test-pandoc.hs b/test/test-pandoc.hs
index e8575e664..396c0f478 100644
--- a/test/test-pandoc.hs
+++ b/test/test-pandoc.hs
@@ -3,8 +3,7 @@
 module Main where
 
 import GHC.IO.Encoding
-import System.Environment (getArgs)
-import Test.Framework
+import Test.Tasty
 import qualified Tests.Command
 import qualified Tests.Old
 import qualified Tests.Readers.Docx
@@ -32,8 +31,8 @@ import qualified Tests.Writers.TEI
 import qualified Tests.Writers.Muse
 import Text.Pandoc.Shared (inDirectory)
 
-tests :: [Test]
-tests = [ Tests.Command.tests
+tests :: TestTree
+tests = testGroup "pandoc tests" [ Tests.Command.tests
         , testGroup "Old" Tests.Old.tests
         , testGroup "Shared" Tests.Shared.tests
         , testGroup "Writers"
@@ -67,5 +66,4 @@ tests = [ Tests.Command.tests
 main :: IO ()
 main = do
   setLocaleEncoding utf8
-  args <- getArgs
-  inDirectory "test" $ defaultMainWithArgs tests args
+  inDirectory "test" $ defaultMain tests
-- 
cgit v1.2.3