Commit 3db385e7 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[STACK LTS] upgrade.

parent 652a05b2
...@@ -34,16 +34,16 @@ type TextQuery = Text ...@@ -34,16 +34,16 @@ type TextQuery = Text
type AuthorQuery = Text type AuthorQuery = Text
getMetadataWith :: Text -> Maybe Int -> IO (Either ServantError Content) getMetadataWith :: Text -> Maybe Int -> IO (Either ClientError Content)
getMetadataWith q l = get l (Just q) Nothing getMetadataWith q l = get l (Just q) Nothing
getMetadataWithAuthor :: Text -> Maybe Int -> IO (Either ServantError Content) getMetadataWithAuthor :: Text -> Maybe Int -> IO (Either ClientError Content)
getMetadataWithAuthor q l = get l Nothing (Just q) getMetadataWithAuthor q l = get l Nothing (Just q)
get :: Maybe Limit get :: Maybe Limit
-> Maybe TextQuery -> Maybe TextQuery
-> Maybe AuthorQuery -> Maybe AuthorQuery
-> IO (Either ServantError Content) -> IO (Either ClientError Content)
get n q a = do get n q a = do
manager' <- newManager tlsManagerSettings manager' <- newManager tlsManagerSettings
runClientM (clientIsidore n q a) runClientM (clientIsidore n q a)
......
...@@ -18,7 +18,7 @@ ...@@ -18,7 +18,7 @@
# #
# resolver: ./custom-snapshot.yaml # resolver: ./custom-snapshot.yaml
# resolver: https://example.com/snapshots/2018-01-01.yaml # resolver: https://example.com/snapshots/2018-01-01.yaml
resolver: lts-13.25 resolver: lts-14.1
# User packages to be built. # User packages to be built.
# Various formats can be used as shown in the example below. # Various formats can be used as shown in the example below.
...@@ -62,4 +62,4 @@ packages: ...@@ -62,4 +62,4 @@ packages:
# extra-lib-dirs: [/path/to/dir] # extra-lib-dirs: [/path/to/dir]
# #
# Allow a newer minor version of GHC than the snapshot specifies # Allow a newer minor version of GHC than the snapshot specifies
# compiler-check: newer-minor # compiler-check: newer-minor
\ No newline at end of file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment