aws-sdk 0.9.4 → 0.9.4.1
raw patch · 6 files changed
+32/−2 lines, 6 filesdep ~containers
Dependency ranges changed: containers
Files
- AWS/Class.hs +10/−0
- AWS/CloudWatch.hs +5/−0
- AWS/EC2/Internal.hs +5/−0
- AWS/ELB.hs +5/−0
- AWS/RDS.hs +5/−0
- aws-sdk.cabal +2/−2
AWS/Class.hs view
@@ -9,6 +9,7 @@ module AWS.Class ( AWS , runAWS+ , runAWS' , AWSException(..) , AWSContext(..) , getLastRequestId@@ -104,6 +105,15 @@ -> m a runAWS ctx cred app = do mgr <- liftIO $ HTTP.newManager HTTP.def+ runAWS' mgr ctx cred app++runAWS' :: Monad m+ => HTTP.Manager+ -> (HTTP.Manager -> c)+ -> Credential+ -> AWS c m a+ -> m a+runAWS' mgr ctx cred app = R.runReaderT (S.evalStateT (runAWST app) $ ctx mgr) cred
AWS/CloudWatch.hs view
@@ -4,6 +4,7 @@ ( -- * CloudWatch Environment CloudWatch , runCloudWatch+ , runCloudWatch' , setRegion , apiVersion -- * Metric@@ -33,6 +34,10 @@ runCloudWatch :: MonadIO m => Credential -> CloudWatch m a -> m a runCloudWatch = runAWS initialCloudWatchContext++runCloudWatch' :: Monad m+ => HTTP.Manager -> Credential -> CloudWatch m a -> m a+runCloudWatch' mgr = runAWS' mgr initialCloudWatchContext setRegion :: (MonadBaseControl IO m, MonadResource m)
AWS/EC2/Internal.hs view
@@ -6,6 +6,7 @@ , EC2 , initialEC2Context , runEC2+ , runEC2' , itemConduit , itemsSet , resourceTagSink@@ -43,6 +44,10 @@ runEC2 :: MonadIO m => Credential -> AWS AWSContext m a -> m a runEC2 = runAWS initialEC2Context++runEC2' :: Monad m+ => HTTP.Manager -> Credential -> AWS AWSContext m a -> m a+runEC2' mgr = runAWS' mgr initialEC2Context itemConduit :: MonadThrow m => Text
AWS/ELB.hs view
@@ -4,6 +4,7 @@ ( -- * ELB Environment ELB , runELB+ , runELB' , setRegion , apiVersion -- * LoadBalancer@@ -33,6 +34,10 @@ runELB :: MonadIO m => Credential -> ELB m a -> m a runELB = runAWS initialELBContext++runELB' :: Monad m+ => HTTP.Manager -> Credential -> ELB m a -> m a+runELB' mgr = runAWS' mgr initialELBContext setRegion :: (MonadBaseControl IO m, MonadResource m)
AWS/RDS.hs view
@@ -4,6 +4,7 @@ ( -- * RDS Environment RDS , runRDS+ , runRDS' , setRegion -- * DBInstance , module AWS.RDS.DBInstance@@ -47,6 +48,10 @@ runRDS :: MonadIO m => Credential -> RDS m a -> m a runRDS = runAWS initialRDSContext++runRDS' :: Monad m+ => HTTP.Manager -> Credential -> RDS m a -> m a+runRDS' mgr = runAWS' mgr initialRDSContext setRegion :: (MonadBaseControl IO m, MonadResource m)
aws-sdk.cabal view
@@ -1,5 +1,5 @@ name: aws-sdk-version: 0.9.4+version: 0.9.4.1 synopsis: AWS SDK for Haskell description: AWS (Amazon Web Services) sdk for Haskell. .@@ -103,7 +103,7 @@ -fno-warn-unused-do-bind extensions: OverloadedStrings build-depends: base >= 4 && < 5- , containers <= 0.4.2.1+ , containers < 0.5.0.0 , SHA , base64-bytestring >= 1.0.0.0 , bytestring