schmittlauch/Hash2Pub
1
0
Fork 1
Code Issues 47 Pull requests Releases Wiki Activity

re-format Servant client pattern matching

Browse source
This commit is contained in:
Trolli Schmittlauch 2020-09-07 16:35:59 +02:00
parent 5c338b9cd7
commit c536994afe
1 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
src/Hash2Pub/PostService.hs
View file

@ -321,15 +321,15 @@ tagUnsubscribe serv hashtag origin = do
clientAPI :: Proxy PostServiceAPI clientAPI :: Proxy PostServiceAPI
clientAPI = Proxy clientAPI = Proxy
relayInboxClient :: Text -> Text -> ClientM NoContent relayInboxClient
relayInboxClient :<|> subscriptionDeliveryClient :<|> subscriptionDeliveryClient
:<|> postFetchClient :<|> postFetchClient
:<|> postMultiFetchClient :<|> postMultiFetchClient
:<|> postInboxClient :<|> postInboxClient
:<|> tagDeliveryClient :<|> tagDeliveryClient
:<|> tagSubscribeClient :<|> tagSubscribeClient
:<|> tagUnsubscribeClient :<|> tagUnsubscribeClient
= client clientAPI = client clientAPI
-- | Deliver the subscriber list of all hashtags in the interval [fromTag, toTag] -- | Deliver the subscriber list of all hashtags in the interval [fromTag, toTag]