packages feed

katip-raven 0.1.0.0 → 0.1.1.0

raw patch · 2 files changed

+8/−8 lines, 2 filesdep ~aesondep ~basedep ~raven-haskell

Dependency ranges changed: aeson, base, raven-haskell

Files

katip-raven.cabal view
@@ -1,15 +1,15 @@ cabal-version:       2.4  name:                katip-raven-version: 0.1.0.0+version:             0.1.1.0 synopsis:            Katip scribe for raven (https://sentry.io) -- description:-homepage:            https://github.com/hercules-ci/katip-raven+homepage:            https://github.com/cachix/katip-raven -- bug-reports: license:             Apache-2.0 license-file:        LICENSE author:              Domen Kozar-maintainer:          domen@hercules-ci.com+maintainer:          domen@cachix.org -- copyright: category:            Web extra-source-files:  CHANGELOG.md@@ -17,11 +17,11 @@ library   exposed-modules:     Katip.Scribes.Raven   default-extensions:  Rank2Types, OverloadedStrings-  build-depends:       base >=4.11 && <4.14-                     , aeson+  build-depends:       base >=4.11 && <5+                     , aeson >= 2.0.0.0                      , text                      , katip-                     , raven-haskell >= 0.1.4.0+                     , raven-haskell >= 0.1.4.1                      , string-conv                      , unordered-containers   hs-source-dirs:      src
src/Katip/Scribes/Raven.hs view
@@ -12,7 +12,7 @@ import qualified Katip.Core import qualified System.Log.Raven as Raven import qualified System.Log.Raven.Types as Raven-+import Data.Aeson.KeyMap (fromHashMapText, toHashMapText)  mkRavenScribe :: Raven.SentryService -> Katip.PermitFunc -> Katip.Verbosity -> IO Katip.Scribe mkRavenScribe sentryService permitItem verbosity = return $@@ -34,7 +34,7 @@             { Raven.srEnvironment = Just $ toS $ Katip.getEnvironment $ Katip._itemEnv item             , Raven.srTimestamp = Katip._itemTime item             -- add katip context as raven extras-            , Raven.srExtra = convertExtra $ Katip.payloadObject verbosity (Katip._itemPayload item) <> katipAttrs+            , Raven.srExtra = convertExtra $ toHashMapText $ Katip.payloadObject verbosity (Katip._itemPayload item) <> fromHashMapText katipAttrs             }      convertExtra :: HM.HashMap T.Text Aeson.Value -> HM.HashMap String Aeson.Value