http-wget 0.6.1 → 0.6.2
raw patch · 2 files changed
+10/−11 lines, 2 filesdep −sybdep ~failurePVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependencies removed: syb
Dependency ranges changed: failure
API changes (from Hackage documentation)
- Network.HTTP.Wget: wget :: (MonadIO m, MonadFailure WgetException m) => String -> [(String, String)] -> [(String, String)] -> m String
+ Network.HTTP.Wget: wget :: (MonadIO m, Failure WgetException m) => String -> [(String, String)] -> [(String, String)] -> m String
- Network.HTTP.Wget: wget' :: (MonadIO m, MonadFailure WgetException m) => String -> [(String, String)] -> [(String, String)] -> m ([(String, String)], String)
+ Network.HTTP.Wget: wget' :: (MonadIO m, Failure WgetException m) => String -> [(String, String)] -> [(String, String)] -> m ([(String, String)], String)
- Network.HTTP.Wget: wgetSplit :: (MonadFailure WgetException m) => String -> [(String, String)] -> [(String, String)] -> IO (m String)
+ Network.HTTP.Wget: wgetSplit :: (Monad m, Failure WgetException m) => String -> [(String, String)] -> [(String, String)] -> IO (m String)
- Network.HTTP.Wget: wgetSplit' :: (MonadFailure WgetException m) => String -> [(String, String)] -> [(String, String)] -> IO (m ([(String, String)], String))
+ Network.HTTP.Wget: wgetSplit' :: (Monad m, Failure WgetException m) => String -> [(String, String)] -> [(String, String)] -> IO (m ([(String, String)], String))
Files
- Network/HTTP/Wget.hs +7/−7
- http-wget.cabal +3/−4
Network/HTTP/Wget.hs view
@@ -36,7 +36,7 @@ #endif import Control.Failure import Control.Exception-import Data.Generics+import Data.Data import Data.Char (isSpace) import Control.Arrow (first, second) import Control.Monad@@ -67,7 +67,7 @@ instance MonadIO SplitHelper where liftIO = SplitHelper . fmap Right -splitException :: MonadFailure WgetException m+splitException :: (Monad m, Failure WgetException m) => SplitHelper x -> IO (m x) splitException i = do@@ -77,7 +77,7 @@ Right v -> return $ return v -- | Same as 'wget', but easier to access the exception on failure.-wgetSplit :: MonadFailure WgetException m+wgetSplit :: (Monad m, Failure WgetException m) => String -- ^ The URL. -> [(String, String)] -- ^ Get parameters. -> [(String, String)] -- ^ Post parameters. If empty, this will be a get request.@@ -85,7 +85,7 @@ wgetSplit url get post = splitException $ wget url get post -- | Same as wget\', but easier to access the exception on failure.-wgetSplit' :: MonadFailure WgetException m+wgetSplit' :: (Monad m, Failure WgetException m) => String -- ^ The URL. -> [(String, String)] -- ^ Get parameters. -> [(String, String)] -- ^ Post parameters. If empty, this will be a get request.@@ -93,15 +93,15 @@ wgetSplit' url get post = splitException $ wget' url get post -- | Get a response from the given URL with the given parameters.-wget :: (MonadIO m, MonadFailure WgetException m)+wget :: (MonadIO m, Failure WgetException m) => String -- ^ The URL. -> [(String, String)] -- ^ Get parameters. -> [(String, String)] -- ^ Post parameters. If empty, this will be a get request. -> m String -- ^ The response body.-wget url get post = snd `fmap` wget' url get post+wget url get post = snd `liftM` wget' url get post -- | Get a response from the given URL with the given parameters, including headers.-wget' :: (MonadIO m, MonadFailure WgetException m)+wget' :: (MonadIO m, Failure WgetException m) => String -- ^ The URL. -> [(String, String)] -- ^ Get parameters. -> [(String, String)] -- ^ Post parameters. If empty, this will be a get request.
http-wget.cabal view
@@ -1,5 +1,5 @@ name: http-wget-version: 0.6.1+version: 0.6.2 license: BSD3 license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>@@ -19,8 +19,7 @@ library build-depends: base >= 4 && < 5, process >= 1.0.1.1 && < 1.1,- failure >= 0.0.0 && < 0.1,- transformers >= 0.1 && < 0.3,- syb+ failure >= 0.0.0 && < 0.2,+ transformers >= 0.1 && < 0.3 exposed-modules: Network.HTTP.Wget ghc-options: -Wall