Skip to content

Commit 4697985

Browse files
Merge pull request softwarefactory-project#28 from TristanCacqueray/dir-export
Export room event Dir data type
2 parents 061fbb1 + 98603ab commit 4697985

File tree

3 files changed

+11
-2
lines changed

3 files changed

+11
-2
lines changed

matrix-client/CHANGELOG.md

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,9 @@
11
# Changelog
22

3+
## 0.1.4.3
4+
5+
- Add missing export for Dir.
6+
37
## 0.1.4.2
48

59
- Support retry-0.9

matrix-client/matrix-client.cabal

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
cabal-version: 2.4
22
name: matrix-client
3-
version: 0.1.4.2
3+
version: 0.1.4.3
44
synopsis: A matrix client library
55
description:
66
Matrix client is a library to interface with https://matrix.org.

matrix-client/src/Network/Matrix/Client.hs

Lines changed: 6 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -39,6 +39,7 @@ module Network.Matrix.Client
3939
getTokenOwner,
4040

4141
-- * Room Events
42+
Dir (..),
4243
EventType (..),
4344
MRCreate (..),
4445
MRCanonicalAlias (..),
@@ -414,7 +415,11 @@ getRoomStateEvent session (RoomID rid) (EventType et) (StateKey key) = do
414415
request <- mkRequest session True $ "/_matrix/client/v3/rooms/" <> rid <> "/state" <> et <> "/" <> key
415416
doRequest session request
416417

417-
data Dir = F | B
418+
data Dir
419+
= -- | Forward
420+
F
421+
| -- | Backward
422+
B
418423

419424
renderDir :: Dir -> B.ByteString
420425
renderDir F = "f"

0 commit comments

Comments
 (0)