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

[API] SearchQuery ok

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