Commit e355d95e authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] add todo

parent 0a00039d
......@@ -78,7 +78,8 @@ instance decodeContact' :: DecodeJson Contact' where
}
-- | TODO rename Contact with User
-- and fix shared decodeJson
newtype Contact =
Contact
{ id :: Int
......@@ -111,7 +112,6 @@ instance decodeContact :: DecodeJson Contact where
, userId
}
----------------------------------------------------------------------------
newtype User =
User
......
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