[FIX] Contact String String -> Contact Void Void, does not render either.

src/Gargantext/Pages/Annuaire/User/Contacts/API.purs

@@ -15,7 +15,7 @@ import Gargantext.Prelude
 import Gargantext.Pages.Annuaire.User.Contacts.Types (Action(..), State, Contact, _contact)
 import Thermite (PerformAction, modifyState)
 
-getContact :: Int -> Aff (Contact String String)
+getContact :: Int -> Aff (Contact Void Void)
 getContact id = get $ toUrl Back Node id
 
 fetchContact :: Int -> StateCoTransformer State Unit

src/Gargantext/Pages/Annuaire/User/Contacts/Specs/Renders.purs

@@ -55,7 +55,7 @@ mapMyMap f m = toUnfoldable
 
 infixl 4 mapMyMap as <.~$>
 
-contactInfos :: HyperData String String -> ReactElement
+contactInfos :: HyperData Void Void -> ReactElement
 contactInfos hyperdata =
     ul [className "list-group"] [] {- $
     listInfo <.~$> hyperdata

src/Gargantext/Pages/Annuaire/User/Contacts/Types.purs

@@ -61,7 +61,7 @@ data Action
 
 type State =
   { activeTab :: Int
-  , contact :: Maybe (Contact String String)
+  , contact :: Maybe (Contact Void Void)
   }
 
 initialState :: State
@@ -70,7 +70,7 @@ initialState =
   , contact: Nothing
   }
 
-_contact :: Lens' State (Maybe (Contact String String))
+_contact :: Lens' State (Maybe (Contact Void Void))
 _contact = lens (\s -> s.contact) (\s ss -> s{contact = ss})
 
 _tablens :: Lens' State Tab.State