aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorAdelyn Breelove <[email protected]>2019-01-17 10:56:12 -0700
committerAdelyn Breelove <[email protected]>2019-01-17 10:56:12 -0700
commit91da90cb637e5338bf81f0da4476fa2975510dc6 (patch)
treea900bd60544968c3bbe043bd7cde092d316bb4dc /lib
parentfix up the example (diff)
downloaddisml-91da90cb637e5338bf81f0da4476fa2975510dc6.tar.xz
disml-91da90cb637e5338bf81f0da4476fa2975510dc6.zip
remove stray spaces
Diffstat (limited to 'lib')
-rw-r--r--lib/config.ml70
1 files changed, 35 insertions, 35 deletions
diff --git a/lib/config.ml b/lib/config.ml
index 99018ea..de01dc2 100644
--- a/lib/config.ml
+++ b/lib/config.ml
@@ -1,37 +1,37 @@
let token = ref ""
- let hello = ref (fun (_:Yojson.Safe.json) -> ())
- let ready = ref (fun (_:Yojson.Safe.json) -> ())
- let resumed = ref (fun (_:Yojson.Safe.json) -> ())
- let invalid_session = ref (fun (_:Yojson.Safe.json) -> ())
- let channel_create = ref (fun (_:Channel_t.t) -> ())
- let channel_update = ref (fun (_:Channel_t.t) -> ())
- let channel_delete = ref (fun (_:Channel_t.t) -> ())
- let channel_pins_update = ref (fun (_:Yojson.Safe.json) -> ())
- let guild_create = ref (fun (_:Guild_t.t) -> ())
- let guild_update = ref (fun (_:Guild_t.t) -> ())
- let guild_delete = ref (fun (_:Guild_t.t) -> ())
- let member_ban = ref (fun (_:Ban_t.t) -> ())
- let member_unban = ref (fun (_:Ban_t.t) -> ())
- let guild_emojis_update = ref (fun (_:Yojson.Safe.json) -> ())
- let integrations_update = ref (fun (_:Yojson.Safe.json) -> ())
- let member_join = ref (fun (_:Member_t.t) -> ())
- let member_leave = ref (fun (_:Member_t.member_wrapper) -> ())
- let member_update = ref (fun (_:Member_t.member_update) -> ())
- let members_chunk = ref (fun (_:Member_t.t list) -> ())
- let role_create = ref (fun (_:Role_t.t) -> ())
- let role_update = ref (fun (_:Role_t.t) -> ())
- let role_delete = ref (fun (_:Role_t.t) -> ())
- let message_create = ref (fun (_:Message_t.t) -> ())
- let message_update = ref (fun (_:Message_t.message_update) -> ())
- let message_delete = ref (fun (_:Snowflake.t) (_:Snowflake.t) -> ())
- let message_bulk_delete = ref (fun (_:Snowflake.t list) -> ())
- let reaction_add = ref (fun (_:Reaction_t.reaction_event) -> ())
- let reaction_remove = ref (fun (_:Reaction_t.reaction_event) -> ())
- let reaction_bulk_remove = ref (fun (_:Reaction_t.t list) -> ())
- let presence_update = ref (fun (_:Presence.t) -> ())
- let typing_start = ref (fun (_:Yojson.Safe.json) -> ())
- let user_update = ref (fun (_:Yojson.Safe.json) -> ())
- let voice_state_update = ref (fun (_:Yojson.Safe.json) -> ())
- let voice_server_update = ref (fun (_:Yojson.Safe.json) -> ())
- let webhooks_update = ref (fun (_:Yojson.Safe.json) -> ()) \ No newline at end of file
+let hello = ref (fun (_:Yojson.Safe.json) -> ())
+let ready = ref (fun (_:Yojson.Safe.json) -> ())
+let resumed = ref (fun (_:Yojson.Safe.json) -> ())
+let invalid_session = ref (fun (_:Yojson.Safe.json) -> ())
+let channel_create = ref (fun (_:Channel_t.t) -> ())
+let channel_update = ref (fun (_:Channel_t.t) -> ())
+let channel_delete = ref (fun (_:Channel_t.t) -> ())
+let channel_pins_update = ref (fun (_:Yojson.Safe.json) -> ())
+let guild_create = ref (fun (_:Guild_t.t) -> ())
+let guild_update = ref (fun (_:Guild_t.t) -> ())
+let guild_delete = ref (fun (_:Guild_t.t) -> ())
+let member_ban = ref (fun (_:Ban_t.t) -> ())
+let member_unban = ref (fun (_:Ban_t.t) -> ())
+let guild_emojis_update = ref (fun (_:Yojson.Safe.json) -> ())
+let integrations_update = ref (fun (_:Yojson.Safe.json) -> ())
+let member_join = ref (fun (_:Member_t.t) -> ())
+let member_leave = ref (fun (_:Member_t.member_wrapper) -> ())
+let member_update = ref (fun (_:Member_t.member_update) -> ())
+let members_chunk = ref (fun (_:Member_t.t list) -> ())
+let role_create = ref (fun (_:Role_t.t) -> ())
+let role_update = ref (fun (_:Role_t.t) -> ())
+let role_delete = ref (fun (_:Role_t.t) -> ())
+let message_create = ref (fun (_:Message_t.t) -> ())
+let message_update = ref (fun (_:Message_t.message_update) -> ())
+let message_delete = ref (fun (_:Snowflake.t) (_:Snowflake.t) -> ())
+let message_bulk_delete = ref (fun (_:Snowflake.t list) -> ())
+let reaction_add = ref (fun (_:Reaction_t.reaction_event) -> ())
+let reaction_remove = ref (fun (_:Reaction_t.reaction_event) -> ())
+let reaction_bulk_remove = ref (fun (_:Reaction_t.t list) -> ())
+let presence_update = ref (fun (_:Presence.t) -> ())
+let typing_start = ref (fun (_:Yojson.Safe.json) -> ())
+let user_update = ref (fun (_:Yojson.Safe.json) -> ())
+let voice_state_update = ref (fun (_:Yojson.Safe.json) -> ())
+let voice_server_update = ref (fun (_:Yojson.Safe.json) -> ())
+let webhooks_update = ref (fun (_:Yojson.Safe.json) -> ()) \ No newline at end of file