typeable/bloodhound
1
0
Fork 0
mirror of https://github.com/typeable/bloodhound.git synced 2024-10-06 05:17:09 +03:00
Code Issues Projects Releases Wiki Activity

Fixed IndexTemplate serialization bug

Browse Source
This commit is contained in:
John Galt 2015-07-20 10:02:49 -04:00
parent ba0b6e1970
commit 051edff567
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/Database/Bloodhound/Types.hs
View File

@ -2020,14 +2020,14 @@ instance ToJSON IndexSettings where
toJSON (IndexSettings s r) = object ["settings" .= object ["shards" .= s, "replicas" .= r]]
instance ToJSON IndexTemplate where
toJSON (IndexTemplate p s m) =
objectNoNulls [ "template" .= p
, "settings" .= s
, "mappings" .= foldl' merge (object []) m
]
toJSON (IndexTemplate p s m) = merge
(object [ "template" .= p
, "mappings" .= foldl' merge (object []) m
])
(toJSON s)
where
objectNoNulls = object . filter (\(_, v) -> v /= Null)
merge (Object o1) (Object o2) = toJSON $ HM.union o1 o2
merge o Null = o
merge _ _ = undefined
instance (FromJSON a) => FromJSON (EsResult a) where