log-warper 0.4 → 0.4.1

raw patch · 2 files changed

+5/−5 lines, 2 files

Files

• log-warper.cabal +2/−2
• test/Test/Wlog/RollingSpec.hs +3/−3

@@ -1,10 +1,10 @@ name:                log-warper-version:             0.4+version:             0.4.1 synopsis:            Flexible, configurable, monadic and pretty logging homepage:            https://github.com/serokell/log-warper license:             MIT license-file:        LICENSE-author:              Serokell team+author:              Serokell maintainer:          Serokell <hi@serokell.io> copyright:           2016-2016 Serokell category:            Interfaces

@@ -7,7 +7,7 @@ import           Universum  import           Control.Concurrent.Async (mapConcurrently)-import           Control.Lens             (zoom, (.=), (?=))+import           Control.Lens             (zoom, (?=)) import qualified Prelude                  (read) import           System.Directory         (doesFileExist, removeFile) import           System.FilePath          (takeExtension)@@ -67,8 +67,8 @@ testLogFile = "patak.log"  testLoggerConfig :: RotationParameters -> LoggerConfig-testLoggerConfig (Just -> rotParam ) = fromScratch $ do-    lcRotation   .= rotParam+testLoggerConfig rotParam = fromScratch $ do+    lcRotation   ?= rotParam     lcFilePrefix ?= "logs"     zoom lcTree $ do         ltSeverity ?= Debug