[FIX] removing template haskell

src/Gargantext/Core/Types/Individu.hs

@@ -15,18 +15,16 @@ Individu defintions
 {-# LANGUAGE NoImplicitPrelude           #-}
 {-# LANGUAGE FlexibleInstances           #-}
 {-# LANGUAGE OverloadedStrings           #-}
-{-# LANGUAGE TemplateHaskell             #-}
 
 module Gargantext.Core.Types.Individu
   where
 
-import Data.Aeson.TH (deriveJSON)
+import Data.Aeson
 import Control.Monad.IO.Class (MonadIO)
 import GHC.Generics (Generic)
 import Data.Swagger
 import Data.Text (Text, pack, reverse)
 import Gargantext.Database.Admin.Types.Node (NodeId, UserId)
-import Gargantext.Core.Utils.Prefix (unPrefix)
 import Gargantext.Prelude hiding (reverse)
 import qualified Gargantext.Core.Auth as Auth
 
@@ -42,6 +40,9 @@ newtype GargPassword = GargPassword Text
 instance Show GargPassword where
   show (GargPassword _) = "*GargPassword*"
 
+instance ToJSON GargPassword
+instance FromJSON GargPassword
+
 instance ToSchema GargPassword
 
 type Email    = Text
@@ -76,5 +77,3 @@ arbitraryUsers :: [(Username, Email, GargPassword)]
 arbitraryUsers = map (\u -> (u, u <> "@gargantext.org", GargPassword $ reverse u)) arbitraryUsername
 
 
-$(deriveJSON (unPrefix "") ''GargPassword)
-