diff --git a/digestive-functors-aeson.cabal b/digestive-functors-aeson.cabal
--- a/digestive-functors-aeson.cabal
+++ b/digestive-functors-aeson.cabal
@@ -1,6 +1,6 @@
 name: digestive-functors-aeson
 category: Web, JSON
-version: 1.1.2
+version: 1.1.3
 license: GPL-3
 license-file: LICENSE
 author: Oliver Charles
@@ -43,13 +43,14 @@
   hs-source-dirs: test
   main-is: Tests.hs
   build-depends:
+    digestive-functors-aeson,
+
     aeson,
     base >= 4.5 && < 4.7,
     bytestring >= 0.9,
     digestive-functors >= 0.6,
-    digestive-functors-aeson ==1.1,
     HUnit >= 1.2,
     mtl,
-    test-framework >= 0.6,
-    test-framework-hunit,
+    tasty >= 0.1,
+    tasty-hunit >= 0.1,
     text >= 0.11
diff --git a/test/Tests.hs b/test/Tests.hs
--- a/test/Tests.hs
+++ b/test/Tests.hs
@@ -1,16 +1,16 @@
 {-# LANGUAGE OverloadedStrings #-}
 module Main where
 
-import           Control.Applicative
-import           Control.Monad.Identity (runIdentity)
-import           Data.Aeson (decode)
-import           Data.ByteString.Lazy.Char8 ()
-import           Data.Text
-import           Test.Framework (Test, defaultMain, testGroup)
-import           Test.Framework.Providers.HUnit (testCase)
-import           Test.HUnit ((@?=))
-import           Text.Digestive (Form, (.:), check, text, listOf)
-import           Text.Digestive.Aeson (digestJSON, jsonErrors)
+import Control.Applicative
+import Control.Monad.Identity (runIdentity)
+import Data.Aeson (decode)
+import Data.ByteString.Lazy.Char8 ()
+import Data.Text (Text)
+import Test.HUnit ((@?=))
+import Text.Digestive (Form, (.:), check, text, listOf)
+import Text.Digestive.Aeson (digestJSON, jsonErrors)
+import Test.Tasty (TestTree, defaultMain, testGroup)
+import Test.Tasty.HUnit (testCase)
 
 import qualified Data.Text as T
 
@@ -31,7 +31,7 @@
 
 
 --------------------------------------------------------------------------------
-testPokemon :: Test
+testPokemon :: TestTree
 testPokemon = testGroup "Pokemon tests" [ testPokemonOk, testPokemonInvalid ]
   where
     testPokemonOk = testCase "Submit pokeForm with valid data" $
@@ -53,7 +53,7 @@
 
 
 --------------------------------------------------------------------------------
-testPokedex :: Test
+testPokedex :: TestTree
 testPokedex = testGroup "Pokedex tests"
                 [ testPokedexSingle
                 , testPokedexMany
@@ -101,7 +101,7 @@
 
 
 --------------------------------------------------------------------------------
-testTopLevelLists :: Test
+testTopLevelLists :: TestTree
 testTopLevelLists = testCase "Top level lists" $ do
   let (Just json) = decode "[\"hello\", \"world\"]"
   (runIdentity $ snd <$> digestJSON (listOf text Nothing) json)
@@ -110,8 +110,8 @@
 
 --------------------------------------------------------------------------------
 main :: IO ()
-main = defaultMain [ testPokemon
-                   , testPokedex
-                   , testTopLevelLists
-                   ]
+main = defaultMain $ testGroup "Tests" [ testPokemon
+                                       , testPokedex
+                                       , testTopLevelLists
+                                       ]