diff options
| author | Adelyn Breelove <[email protected]> | 2019-01-23 14:12:13 -0700 |
|---|---|---|
| committer | Adelyn Breelove <[email protected]> | 2019-01-23 14:12:13 -0700 |
| commit | a1df3b86a34b09ccb216032e052c22b12c0ca4c0 (patch) | |
| tree | 844abc3393794738467acf8d7b03f9a000b87d4e /lib | |
| parent | changes for consistency (diff) | |
| download | disml-a1df3b86a34b09ccb216032e052c22b12c0ca4c0.tar.xz disml-a1df3b86a34b09ccb216032e052c22b12c0ca4c0.zip | |
fix event dispatch for MESSAGE_DELETE_BULK
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/event.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/event.ml b/lib/event.ml index 3255470..7082858 100644 --- a/lib/event.ml +++ b/lib/event.ml @@ -65,7 +65,7 @@ let event_of_yojson ~contents t = match t with | "MESSAGE_CREATE" -> MESSAGE_CREATE (Message_t.of_yojson_exn contents) | "MESSAGE_UPDATE" -> MESSAGE_UPDATE (Message_t.message_update_of_yojson_exn contents) | "MESSAGE_DELETE" -> MESSAGE_DELETE (Yojson.Safe.Util.(member "id" contents |> Snowflake.of_yojson_exn), Yojson.Safe.Util.(member "channel_id" contents |> Snowflake.of_yojson_exn)) - | "MESSAGE_DELETE_BULK" -> MESSAGE_DELETE_BULK (Yojson.Safe.Util.to_list contents |> List.map ~f:Snowflake.of_yojson_exn) + | "MESSAGE_DELETE_BULK" -> MESSAGE_DELETE_BULK (Yojson.Safe.Util.(member "ids" contents |> to_list) |> List.map ~f:Snowflake.of_yojson_exn) | "MESSAGE_REACTION_ADD" -> MESSAGE_REACTION_ADD (Reaction_t.reaction_event_of_yojson_exn contents) | "MESSAGE_REACTION_REMOVE" -> MESSAGE_REACTION_REMOVE (Reaction_t.reaction_event_of_yojson_exn contents) | "MESSAGE_REACTION_REMOVE_ALL" -> MESSAGE_REACTION_REMOVE_ALL (Yojson.Safe.Util.to_list contents |> List.map ~f:Reaction_t.of_yojson_exn) |