packages feed

loup 0.0.12 → 0.0.13

raw patch · 4 files changed

+9/−15 lines, 4 filesdep −basic-preludedep ~loupdep ~preamblePVP ok

version bump matches the API change (PVP)

Dependencies removed: basic-prelude

Dependency ranges changed: loup, preamble

API changes (from Hackage documentation)

Files

Shakefile.hs view
@@ -16,12 +16,12 @@ main :: IO () main = shakeMain $ do   let pats =-        [ "stack.yaml"+        [ "stack*.yaml"         , "Shakefile.hs"         , "main//*.hs"         , "src//*.hs"         ]-      pats' = delete "stack.yaml" pats+      pats' = delete "stack*.yaml" pats    -- | Haskell rules.   --
loup.cabal view
@@ -1,5 +1,5 @@ name: loup-version: 0.0.12+version: 0.0.13 cabal-version: >=1.22 build-type: Simple license: MIT@@ -25,12 +25,11 @@         amazonka >=1.4.3,         amazonka-swf >=1.4.3,         base >=4.8 && <5,-        basic-prelude >=0.5.2,         bytestring >=0.10.6.0,         conduit >=1.2.10,         lifted-async >=0.9.1.1,         lifted-base >=0.2.3.11,-        preamble >=0.0.46,+        preamble >=0.0.47,         time >=1.5.0.1,         turtle >=1.3.6,         unordered-containers >=0.2.8.0,@@ -55,7 +54,7 @@     main-is: actor.hs     build-depends:         base >=4.8.2.0,-        loup >=0.0.12,+        loup >=0.0.13,         optparse-generic >=1.1.5     default-language: Haskell2010     hs-source-dirs: main@@ -65,7 +64,7 @@     main-is: decider.hs     build-depends:         base >=4.8.2.0,-        loup >=0.0.12,+        loup >=0.0.13,         optparse-generic >=1.1.5     default-language: Haskell2010     hs-source-dirs: main@@ -75,7 +74,7 @@     main-is: converger.hs     build-depends:         base >=4.8.2.0,-        loup >=0.0.12,+        loup >=0.0.13,         optparse-generic >=1.1.5     default-language: Haskell2010     hs-source-dirs: main
src/Network/AWS/Loup/Converge.hs view
@@ -1,4 +1,3 @@-{-# LANGUAGE CPP               #-} {-# LANGUAGE FlexibleContexts  #-} {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-}@@ -57,11 +56,7 @@     wids <- fromList <$> listWorkflows domain activity     let fold kvs as action = do           let g k v bs = do-#if MIN_VERSION_basic_prelude(0,6,1)-                let k' = k -.- textFromString (show (hash v))-#else-                let k' = k -.- show (hash v)-#endif+                let k' = k -.- textShow (hash v)                 if k' `member` bs then return $ k' `delete` bs else action k' v >> return bs           ifoldrM g as kvs     wids' <- fold (pool ^. pWorkers) wids $ \wid input -> do
src/Network/AWS/Loup/Decide.hs view
@@ -127,7 +127,7 @@ nothing :: MonadDecisionCtx c m => m [Decision] nothing = do   events <- view dcEvents-  traceError "none" [ "events" .= (show . view heEventType <$> events) ]+  traceError "none" [ "events" .= (textShow . view heEventType <$> events) ]   return mempty  -- | Schedule decision based on history events.