diff --git a/test/TestImport.hs b/test/TestImport.hs index c8d1391bf..ed01b32da 100644 --- a/test/TestImport.hs +++ b/test/TestImport.hs @@ -63,7 +63,7 @@ import qualified Control.Monad.State.Class as State import qualified Servant.Types.SourceT as S import Servant.API (SourceIO) -import Utils (throwExceptT, Canonical(..)) +import Utils (throwExceptT) import Yesod.Servant (ServantApi, servantApiBaseUrl) diff --git a/test/Utils/TypesSpec.hs b/test/Utils/TypesSpec.hs index ccb6e016e..a93bf2a89 100644 --- a/test/Utils/TypesSpec.hs +++ b/test/Utils/TypesSpec.hs @@ -1,6 +1,7 @@ module Utils.TypesSpec where import TestImport +import Utils instance Arbitrary SloppyBool where arbitrary = SloppyBool <$> arbitrary