Commit 077646e2 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[API] SearchQuery ok

parent 249321f5
...@@ -22,9 +22,9 @@ derive instance genericSearchType :: Generic SearchType _ ...@@ -22,9 +22,9 @@ derive instance genericSearchType :: Generic SearchType _
instance showSearchType :: Show SearchType where instance showSearchType :: Show SearchType where
show = genericShow show = genericShow
instance decodeJsonSearchType :: Argonaut.DecodeJson SearchType where instance decodeJsonSearchType :: Argonaut.DecodeJson SearchType where
decodeJson = genericSumDecodeJson decodeJson = genericEnumDecodeJson
instance encodeJsonSearchType :: Argonaut.EncodeJson SearchType where instance encodeJsonSearchType :: Argonaut.EncodeJson SearchType where
encodeJson = genericSumEncodeJson encodeJson = genericEnumEncodeJson
------------------------------------------------------------------------ ------------------------------------------------------------------------
data SearchQuery = data SearchQuery =
......
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