git.iko.soy/denis
on master help sign in
Quick path bug fix
42c4feeiko
denis/src/Server/API/Messages.hs+2−2
compare with master
unifiedsplit
@@ -40,8 +40,8 @@ type MessagesApi =
40 "leaveGroupChat" :> LeaveGroupChatDescription :> ReqBody '[JSON] GroupChatId :> PostNoContent '[JSON, FormUrlEncoded, PlainText] NoContent) :<|>
40 "leaveGroupChat" :> LeaveGroupChatDescription :> ReqBody '[JSON] GroupChatId :> PostNoContent '[JSON, FormUrlEncoded, PlainText] NoContent) :<|>
41 "messages" :> "get" :> (
41 "messages" :> "get" :> (
42 "groupChat" :> MessagesGetGroupChatDesctiption :> ReqBody '[JSON] (PaginatingRequest MessageId GroupChatId) :> Post '[JSON] [Message] :<|>
42 "groupChat" :> MessagesGetGroupChatDesctiption :> ReqBody '[JSON] (PaginatingRequest MessageId GroupChatId) :> Post '[JSON] [Message] :<|>
43− "userChat" :> MessagesGetUserChatDesctiption :> ReqBody '[JSON] (PaginatingRequest MessageId UserId) :> Post '[JSON] [Message]) :<|>
43+ "userChat" :> MessagesGetUserChatDesctiption :> ReqBody '[JSON] (PaginatingRequest MessageId UserId) :> Post '[JSON] [Message] :<|>
44− "send" :> MessagesSend :> ReqBody '[JSON] MessageCreation :> Post '[JSON] MessageId
44+ "send" :> MessagesSend :> ReqBody '[JSON] MessageCreation :> Post '[JSON] MessageId)
45
45
46
46
47messagesServer :: UserId -> ServerT MessagesApi App
47messagesServer :: UserId -> ServerT MessagesApi App