GargServer fix

parent d611eb6a
...@@ -72,7 +72,9 @@ import Gargantext.Database.Types.Node (CorpusId, ContactId) ...@@ -72,7 +72,9 @@ import Gargantext.Database.Types.Node (CorpusId, ContactId)
import Test.QuickCheck (elements) import Test.QuickCheck (elements)
import Test.QuickCheck.Arbitrary (Arbitrary, arbitrary) import Test.QuickCheck.Arbitrary (Arbitrary, arbitrary)
type GargServer api = forall env m. (CmdM env ServantErr m, HasRepoVar env) type GargServer api =
forall env m.
(CmdM env ServantErr m, HasRepoVar env, HasRepoSaver env)
=> ServerT api m => ServerT api m
------------------------------------------------------------------- -------------------------------------------------------------------
......
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