[tests] fix hspec test compilation issue

Also, use genericArbitrary in Instances, this simplifies things
parent a250518a
Pipeline #6990 passed with stages
in 72 minutes and 47 seconds
......@@ -738,6 +738,7 @@ common testDependencies
, fmt
, gargantext
, gargantext-prelude
, generic-arbitrary >= 1.0.1 && < 2
, graphviz ^>= 2999.20.1.0
, haskell-bee
, hspec ^>= 2.11.1
......
......@@ -207,7 +207,7 @@ data PhyloSubConfigAPI =
, _sc_clique :: Cluster
, _sc_exportFilter :: Double
, _sc_defaultMode :: Bool
} deriving (Show,Generic,Eq)
} deriving (Show, Generic, Eq)
subConfigAPI2config :: PhyloSubConfigAPI -> PhyloConfig
......
......@@ -25,7 +25,7 @@ import Control.Monad.STM (atomically)
import Data.Aeson qualified as Aeson
import Data.Maybe (isJust)
import Gargantext.Core.Notifications.Dispatcher.Types qualified as DT
import Gargantext.Core.Worker.Jobs (sendJobCfg)
import Gargantext.Core.Worker.Jobs (sendJobWithCfg)
import Gargantext.Core.Worker.Jobs.Types (Job(Ping))
import Network.WebSockets qualified as WS
import Prelude
......@@ -61,7 +61,7 @@ tests = sequential $ aroundAll withTestDBAndPort $ do
-- wait a bit to connect
threadDelay (500 * millisecond)
_ <- sendJobCfg cfg Ping
_ <- sendJobWithCfg cfg Ping
mTimeout <- Timeout.timeout (5 * 1000000) $ do
md <- atomically $ readTChan tchan
......
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment