raven-haskell 0.1.3.0 → 0.1.4.0

raw patch · 3 files changed

+8/−8 lines, 3 filesdep +uuid-typesdep −uuid

Dependencies added: uuid-types

Dependencies removed: uuid

Files

• raven-haskell.cabal +4/−4
• src/System/Log/Raven.hs +3/−3
• src/System/Log/Raven/Types.hs +1/−1

@@ -1,13 +1,13 @@ name:                raven-haskell-version:             0.1.3.0+version:             0.1.4.0 synopsis:            Haskell client for Sentry logging service.--- description:         +-- description: homepage:            https://bitbucket.org/dpwiz/raven-haskell license:             MIT license-file:        LICENSE author:              Alexander Bondarenko maintainer:          aenor.realm@gmail.com--- copyright:           +-- copyright: category:            Logging build-type:          Simple cabal-version:       >=1.8@@ -37,7 +37,7 @@     text,     time >= 1.5.0.1,     unordered-containers,-    uuid+    uuid-types  test-suite test   type: exitcode-stdio-1.0

@@ -54,10 +54,10 @@     , record, recordLBS     ) where -import Data.Aeson (encode)+import Data.Aeson (Value, encode) import Data.ByteString.Lazy (ByteString) -import Data.UUID (UUID)+import Data.UUID.Types (UUID) import System.Random (randomIO) import Data.Time.Clock (getCurrentTime) import System.IO (stderr, hPutStrLn)@@ -142,5 +142,5 @@ tags ts r = r { srTags = HM.fromList ts `HM.union` srTags r }  -- | Add record extra information.-extra :: [(String, String)] -> SentryRecord -> SentryRecord+extra :: [(String, Value)] -> SentryRecord -> SentryRecord extra ts r =  r { srExtra = HM.fromList ts `HM.union` srExtra r }

@@ -101,7 +101,7 @@                                  , srTags        :: !Assoc                                  , srServerName  :: Maybe String                                  , srModules     :: !Assoc-                                 , srExtra       :: !Assoc+                                 , srExtra       :: HM.HashMap String Value                                  , srInterfaces  :: HM.HashMap String Value                                  , srRelease     :: Maybe String                                  , srEnvironment :: Maybe String