yam 0.6.1 → 0.6.2

raw patch · 6 files changed

+21/−21 lines, 6 filesdep ~QuickCheckdep ~exceptionsdep ~lens

Dependency ranges changed: QuickCheck, exceptions, lens, servant-swagger, servant-swagger-ui, swagger2, vector, warp

Files

src/Yam.hs +1/−1
src/Yam/Logger.hs +1/−1
src/Yam/Middleware/Client.hs +1/−1
src/Yam/Prelude.hs +1/−1
src/Yam/Server/Refresh.hs +1/−1
yam.cabal +16/−16

src/Yam.hs view

@@ -134,7 +134,7 @@   sw@SwaggerConfig{..} <- require  "swagger"   withLogger name c $ \logger -> unSalak $ do     let portText = showText port-        baseCxt = (LF logger :. EmptyContext)+        baseCxt  = LF logger :. EmptyContext     logInfo $ "Start Service [" <> name <> "] ..."     amd <- mkAMD     ser <- mkSer

src/Yam/Logger.hs view

@@ -73,7 +73,7 @@ withLogger :: (MonadUnliftIO m) => Text -> IO LogConfig -> (LogFunc -> LoggingT m a) -> m a withLogger n lc action = do   f <- askRunInIO-  liftIO $ bracket (newLogger n lc) (snd) $ f . runLoggingT (askLoggerIO >>= action) . fst+  liftIO $ bracket (newLogger n lc) snd $ f . runLoggingT (askLoggerIO >>= action) . fst  addTrace :: LogFunc -> Text -> LogFunc addTrace f tid a b c d = let p = "[" <> toLogStr tid <> "] " in f a b c (p <> d)

src/Yam/Middleware/Client.hs view

@@ -37,7 +37,7 @@       , managerIdleConnectionCount = idleCount       } -data HttpClient = HttpClient Manager+newtype HttpClient = HttpClient Manager  type HasHttpClient cxt = (HasLogger cxt, HasContextEntry cxt HttpClient)

src/Yam/Prelude.hs view

@@ -118,7 +118,7 @@ showText :: Show a => a -> Text showText = pack . show -data WebErrResult = WebErrResult+newtype WebErrResult = WebErrResult   { message :: Text   }

src/Yam/Server/Refresh.hs view

@@ -11,7 +11,7 @@  refreshEndpoint :: (HasLogger cxt, MonadIO m) => IO ReloadResult -> Bool -> AppT cxt m Text refreshEndpoint io True = do-  ReloadResult{..} <- liftIO $ io+  ReloadResult{..} <- liftIO io   if isError     then throwS err400 $ showMsg msg     else return $ showMsg msg

yam.cabal view

@@ -1,6 +1,6 @@ cabal-version: 1.12 name: yam-version: 0.6.1+version: 0.6.2 license: BSD3 license-file: LICENSE copyright: (c) 2018 Daniel YU@@ -58,11 +58,11 @@         binary >=0.8.6.0 && <0.9,         bytestring >=0.10.8.2 && <0.11,         data-default >=0.7.1.1 && <0.8,-        exceptions >=0.10.1 && <0.11,+        exceptions >=0.10.2 && <0.11,         fast-logger >=2.4.15 && <2.5,         http-client >=0.6.4 && <0.7,         http-types >=0.12.3 && <0.13,-        lens ==4.17.*,+        lens >=4.17.1 && <4.18,         menshen >=0.0.3 && <0.1,         monad-logger >=0.3.30 && <0.4,         mtl >=2.2.2 && <2.3,@@ -72,17 +72,17 @@         scientific >=0.3.6.2 && <0.4,         servant-client ==0.16.*,         servant-server ==0.16.*,-        servant-swagger >=1.1.7 && <1.2,-        servant-swagger-ui >=0.3.2.3.19.3 && <0.4,-        swagger2 >=2.3.1.1 && <2.4,+        servant-swagger >=1.1.7.1 && <1.2,+        servant-swagger-ui >=0.3.3.3.22.2 && <0.4,+        swagger2 ==2.4.*,         text >=1.2.3.1 && <1.3,         transformers >=0.5.6.2 && <0.6,         unliftio-core >=0.1.2.0 && <0.2,         unordered-containers >=0.2.10.0 && <0.3,         vault >=0.3.1.2 && <0.4,-        vector >=0.12.0.2 && <0.13,+        vector >=0.12.0.3 && <0.13,         wai >=3.2.2 && <3.3,-        warp >=3.2.26 && <3.3+        warp >=3.2.27 && <3.3  test-suite spec     type: exitcode-stdio-1.0@@ -122,19 +122,19 @@                         TypeSynonymInstances ViewPatterns     ghc-options: -Wall     build-depends:-        QuickCheck >=2.12.6.1 && <2.14,+        QuickCheck >=2.13.1 && <2.14,         aeson >=1.4.2.0 && <1.5,         base >=4.10 && <5,         base16-bytestring >=0.1.1.6 && <0.2,         binary >=0.8.6.0 && <0.9,         bytestring >=0.10.8.2 && <0.11,         data-default >=0.7.1.1 && <0.8,-        exceptions >=0.10.1 && <0.11,+        exceptions >=0.10.2 && <0.11,         fast-logger >=2.4.15 && <2.5,         hspec ==2.*,         http-client >=0.6.4 && <0.7,         http-types >=0.12.3 && <0.13,-        lens ==4.17.*,+        lens >=4.17.1 && <4.18,         menshen >=0.0.3 && <0.1,         monad-logger >=0.3.30 && <0.4,         mtl >=2.2.2 && <2.3,@@ -144,14 +144,14 @@         scientific >=0.3.6.2 && <0.4,         servant-client ==0.16.*,         servant-server ==0.16.*,-        servant-swagger >=1.1.7 && <1.2,-        servant-swagger-ui >=0.3.2.3.19.3 && <0.4,-        swagger2 >=2.3.1.1 && <2.4,+        servant-swagger >=1.1.7.1 && <1.2,+        servant-swagger-ui >=0.3.3.3.22.2 && <0.4,+        swagger2 ==2.4.*,         text >=1.2.3.1 && <1.3,         transformers >=0.5.6.2 && <0.6,         unliftio-core >=0.1.2.0 && <0.2,         unordered-containers >=0.2.10.0 && <0.3,         vault >=0.3.1.2 && <0.4,-        vector >=0.12.0.2 && <0.13,+        vector >=0.12.0.3 && <0.13,         wai >=3.2.2 && <3.3,-        warp >=3.2.26 && <3.3+        warp >=3.2.27 && <3.3