log-elasticsearch 0.13.0.0 → 0.13.0.1

raw patch · 3 files changed

+13/−5 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGELOG.md +3/−0
• log-elasticsearch.cabal +2/−2
• src/Log/Backend/ElasticSearch/Internal.hs +8/−3

@@ -1,3 +1,6 @@+# log-elasticsearch-0.13.0.1 (2023-01-31)+* Add support for OpenSearch.+ # log-elasticsearch-0.13.0.0 (2022-09-21) * Remove deprecated `elasticSearchLogger`. * Use `http-client-openssl` by default instead of `http-client-tls`.

@@ -1,5 +1,5 @@ name:                log-elasticsearch-version:             0.13.0.0+version:             0.13.0.1 synopsis:            Structured logging solution (Elasticsearch back end)  description:         Elasticsearch back end for the 'log' library suite.@@ -18,7 +18,7 @@ build-type:          Simple cabal-version:       >=1.10 extra-source-files:  CHANGELOG.md, README.md-tested-with:         GHC ==8.8.4 || ==8.10.7 || ==9.0.2 || ==9.2.4 || ==9.4.2+tested-with:         GHC ==8.8.4 || ==8.10.7 || ==9.0.2 || ==9.2.5 || ==9.4.4  Source-repository head   Type:     git

@@ -89,9 +89,14 @@ parseEsVersion js = do   Object props <- pure js   Object version <- "version" `AC.lookup` props-  String number <- "number" `AC.lookup` version-  [v1, v2, v3] <- mapM (maybeRead . T.unpack) $ T.splitOn "." number-  pure $ EsVersion v1 v2 v3+  case "distribution" `AC.lookup` version of+    Just "opensearch" -> do+      -- OpenSearch is compatible (so far) with esV7 mappings.+      pure esV7+    _ -> do+      String number <- "number" `AC.lookup` version+      [v1, v2, v3] <- mapM (maybeRead . T.unpack) $ T.splitOn "." number+      pure $ EsVersion v1 v2 v3   where     maybeRead s = do       [(v, "")] <- pure $ reads s