logging-effect 1.2.1 → 1.2.2
raw patch · 3 files changed
+12/−5 lines, 3 filesdep ~freedep ~time
Dependency ranges changed: free, time
Files
- Changelog.md +8/−0
- logging-effect.cabal +3/−3
- src/Control/Monad/Log.hs +1/−2
Changelog.md view
@@ -1,3 +1,11 @@+# 1.2.2++## Other Changes++* Increased upper bound of `free` and `time`.++---+ # 1.2.1 ## Other Changes
logging-effect.cabal view
@@ -1,5 +1,5 @@ name: logging-effect-version: 1.2.1+version: 1.2.2 synopsis: A mtl-style monad transformer for general purpose & compositional logging homepage: https://github.com/ocharles/logging-effect license: BSD3@@ -17,10 +17,10 @@ , async >=2.0 && <2.2 , transformers >=0.4 && <0.6 , text >=1.2 && <1.3- , time >=1.5 && <1.9+ , time >=1.5 && <1.10 , mtl >= 2.2.1 && <2.3 , exceptions >= 0.8.0.2 && <0.9- , free >= 4.12.1 && < 4.13+ , free >= 4.12.1 && < 5.1 , stm >= 2.4.4.1 && < 2.5 , stm-delay >= 0.1.1.1 && < 0.2 , wl-pprint-text >= 1.1.0.4 && < 1.2
src/Control/Monad/Log.hs view
@@ -16,7 +16,6 @@ {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE UndecidableInstances #-}-{-# LANGUAGE ViewPatterns #-} module Control.Monad.Log ( -- * Introduction@@ -801,7 +800,7 @@ main = do 'withFDHandler' 'defaultBatchingOptions' 'stderr' 0.4 80 $ \\stderrHandler -> 'withFDHandler' 'defaultBatchingOptions' 'stdout' 0.4 80 $ \\stdoutHandler ->- 'runLoggingT' m+ 'runLoggingT' testApp (\\message -> case 'msgSeverity' message of 'Error' -> stderrHandler ('discardSeverity' message)