@@ -173,7 +173,7 @@ data Version = Version { number :: Text
173173 <http://www.elasticsearch.org/guide/en/elasticsearch/reference/current/indices-status.html#indices-status>
174174-}
175175
176−data Status = Status { ok :: Bool
176+data Status = Status { ok :: Maybe Bool
177177 , status :: Int
178178 , name :: Text
179179 , version :: Version
@@ -1509,7 +1509,7 @@ instance FromJSON DocId
15091509
15101510instance FromJSON Status where
15111511 parseJSON (Object v) = Status <$>
1512− v .: "ok" <*>
1512+ v .:? "ok" <*>
15131513 v .: "status" <*>
15141514 v .: "name" <*>
15151515 v .: "version" <*>