stratux-http 0.0.10 → 0.0.11
raw patch · 2 files changed
+16/−16 lines, 2 filesdep +transformersdep −eitherdep ~aesondep ~stratux-types
Dependencies added: transformers
Dependencies removed: either
Dependency ranges changed: aeson, stratux-types
Files
- src/Data/Aviation/Stratux/HTTP.hs +12/−12
- stratux-http.cabal +4/−4
src/Data/Aviation/Stratux/HTTP.hs view
@@ -16,7 +16,7 @@ import Control.Applicative((<$>)) import Control.Monad((>>=))-import Control.Monad.Trans.Either(EitherT(EitherT))+import Control.Monad.Trans.Except(ExceptT(ExceptT)) import Data.Aeson(eitherDecode, eitherDecode', encode) import Data.Aviation.Stratux.Types.Status(Status) import Data.Aviation.Stratux.Types.Settings(Settings, SettingsSet)@@ -47,9 +47,9 @@ -> URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT e IO a+ -> ExceptT e IO a getWith path d auth query fragment =- EitherT (d <$> httpGet auth path query fragment)+ ExceptT (d <$> httpGet auth path query fragment) getStatusWith :: HStream x =>@@ -57,7 +57,7 @@ -> URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT e IO Status+ -> ExceptT e IO Status getStatusWith = getWith "/getStatus" @@ -65,7 +65,7 @@ URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT String IO Status+ -> ExceptT String IO Status getStatus = getStatusWith eitherDecode @@ -73,7 +73,7 @@ URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT String IO Status+ -> ExceptT String IO Status getStatus' = getStatusWith eitherDecode' @@ -83,7 +83,7 @@ -> URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT e IO Settings+ -> ExceptT e IO Settings getSettingsWith = getWith "/getSettings" @@ -91,7 +91,7 @@ URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT String IO Settings+ -> ExceptT String IO Settings getSettings = getSettingsWith eitherDecode @@ -99,7 +99,7 @@ URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT String IO Settings+ -> ExceptT String IO Settings getSettings' = getSettingsWith eitherDecode' @@ -129,7 +129,7 @@ -> URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT e IO Situation+ -> ExceptT e IO Situation getSituationWith = getWith "/getSituation" @@ -137,7 +137,7 @@ URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT String IO Situation+ -> ExceptT String IO Situation getSituation = getSituationWith eitherDecode @@ -145,6 +145,6 @@ URIAuth -- ^ authority @\/\/anonymous\@www.haskell.org:42@ -> String -- ^ query @?query@ -> String -- ^ fragment @#frag@- -> EitherT String IO Situation+ -> ExceptT String IO Situation getSituation' = getSituationWith eitherDecode'
stratux-http.cabal view
@@ -1,5 +1,5 @@ name: stratux-http-version: 0.0.10+version: 0.0.11 license: BSD3 license-file: LICENCE author: Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>@@ -24,11 +24,11 @@ build-depends: base >= 4 && < 6- , stratux-types >= 0.0.10 && < 0.1+ , stratux-types >= 0.0.11 && < 0.1 , HTTP >= 4000 && < 5000 , network-uri >= 2.6 && < 3.0- , aeson >= 1.0 && < 1.1- , either >= 0.4 && < 5.0+ , aeson >= 1.0 && < 1.5+ , transformers >= 0.4 && < 1.0 , utf8-string >= 1.0 && < 2.0 ghc-options: