aboutsummaryrefslogtreecommitdiff
path: root/lib/models/guild/member_t.ml
diff options
context:
space:
mode:
authorAdelyn Breedlove <[email protected]>2019-01-27 14:09:33 -0700
committerAdelyn Breedlove <[email protected]>2019-01-27 14:09:33 -0700
commitfbd3597c7ab798cf10a447eb2b477dd4e3ed6d33 (patch)
tree16d1ef889e9c6f1090dd911e6fb31392625066c2 /lib/models/guild/member_t.ml
parenthopeful reconnection fix (diff)
downloaddisml-fbd3597c7ab798cf10a447eb2b477dd4e3ed6d33.tar.xz
disml-fbd3597c7ab798cf10a447eb2b477dd4e3ed6d33.zip
Switch to ID abstractions internally
Diffstat (limited to 'lib/models/guild/member_t.ml')
-rw-r--r--lib/models/guild/member_t.ml16
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/models/guild/member_t.ml b/lib/models/guild/member_t.ml
index e6edb61..10f1cf0 100644
--- a/lib/models/guild/member_t.ml
+++ b/lib/models/guild/member_t.ml
@@ -2,7 +2,7 @@ open Core
type partial_member = {
nick: string option [@default None];
- roles: Snowflake.t list;
+ roles: Role_id.t list;
joined_at: string;
deaf: bool;
mute: bool;
@@ -10,7 +10,7 @@ type partial_member = {
type member = {
nick: string option [@default None];
- roles: Snowflake.t list;
+ roles: Role_id.t list;
joined_at: string;
deaf: bool;
mute: bool;
@@ -18,26 +18,26 @@ type member = {
} [@@deriving sexp, yojson { strict = false}]
type member_wrapper = {
- guild_id: Snowflake.t;
+ guild_id: Guild_id_t.t;
user: User_t.t;
} [@@deriving sexp, yojson { strict = false }]
type member_update = {
- guild_id: Snowflake.t;
- roles: Snowflake.t list [@default []];
+ guild_id: Guild_id_t.t;
+ roles: Role_id.t list [@default []];
user: User_t.t;
nick: string option [@default None];
} [@@deriving sexp, yojson { strict = false}]
type t = {
nick: string option [@default None];
- roles: Snowflake.t list;
+ roles: Role_id.t list;
joined_at: string;
deaf: bool;
mute: bool;
user: User_t.t;
- guild_id: Snowflake.t;
+ guild_id: Guild_id_t.t;
} [@@deriving sexp, yojson { strict = false}]
let wrap ~guild_id ({nick;roles;joined_at;deaf;mute;user}:member) =
- {nick;roles;joined_at;deaf;mute;user;guild_id} \ No newline at end of file
+ {nick;roles;joined_at;deaf;mute;user;guild_id = `Guild_id guild_id} \ No newline at end of file