servant-proto-lens 0.1.0.2 → 0.1.0.3
raw patch · 5 files changed
+13/−5 lines, 5 filesdep ~basePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: base
API changes (from Hackage documentation)
Files
- ChangeLog.md +7/−0
- servant-proto-lens.cabal +3/−3
- test/Spec.hs +1/−1
- test/TestClient.hs +1/−1
- test/TestServer.hs +1/−0
ChangeLog.md view
@@ -1,5 +1,12 @@ # Revision history for servant-proto-lens +## 0.1.0.3 -- 2018-09-29++* Loosen version bounds (Thanks [vrom911](http://github.com/vrom911))+* Update test+ * `servant-client-0.14` - additional arg to `ClientEnv`+ * `proto-lens-protobuf-types-0.3.0.1` - fields are exported in different module; protobuf constructor takes additional argument+ ## 0.1.0.2 -- 2017-01-31 * Loosen version bounds.
servant-proto-lens.cabal view
@@ -1,5 +1,5 @@ name: servant-proto-lens-version: 0.1.0.2+version: 0.1.0.3 synopsis: Servant Content-Type for proto-lens protobuf modules. description: A type with instances for Accept, MimeRender, and MimeUnrender to use proto-lens protobuf modules with Servant APIs. license: BSD3@@ -16,7 +16,7 @@ library hs-source-dirs: src exposed-modules: Servant.API.ContentTypes.Proto- build-depends: base >=4.8 && <4.11+ build-depends: base >=4.8 && <5 , bytestring , http-media , proto-lens@@ -29,7 +29,7 @@ main-is: Spec.hs other-modules: TestServer TestClient- build-depends: base >=4.8 && <4.11+ build-depends: base >=4.8 && <5 , HUnit , async , data-default-class
test/Spec.hs view
@@ -17,7 +17,7 @@ -- same port, this must be run with the single threaded runtime. This is -- acceptable because the goal here is to test the protobuf de/serialization, -- not servant.-main = let d = (D.Duration 12 34) in defaultMain+main = let d = (D.Duration 12 34 []) in defaultMain [ getDur def , getDur d , exSec def 0
test/TestClient.hs view
@@ -16,6 +16,6 @@ run :: Int -> S.ClientM a -> IO (Either S.ServantError a) run port action = do mgr <- H.newManager H.defaultManagerSettings- S.runClientM action (S.ClientEnv mgr baseUrl)+ S.runClientM action (S.ClientEnv mgr baseUrl Nothing) where baseUrl = S.BaseUrl S.Http "localhost" port ""
test/TestServer.hs view
@@ -7,6 +7,7 @@ import qualified Control.Concurrent.MVar as M import qualified Network.Wai.Handler.Warp as W import qualified Proto.Google.Protobuf.Duration as D+import qualified Proto.Google.Protobuf.Duration_Fields as D import qualified Servant as S import qualified Servant.API.ContentTypes.Proto as P