diff options
Diffstat (limited to 'lib/gateway/dispatch.mli')
| -rw-r--r-- | lib/gateway/dispatch.mli | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/lib/gateway/dispatch.mli b/lib/gateway/dispatch.mli index 18b9261..89905a6 100644 --- a/lib/gateway/dispatch.mli +++ b/lib/gateway/dispatch.mli @@ -6,14 +6,14 @@ [Client.guild_create := (fun guild -> print_endline guild.name)]
{[
- open Core
- open Disml
-
- let check_command (msg : Message.t) =
- if String.is_prefix ~prefix:"!ping" msg.content then
- Message.reply msg "Pong!" >>> ignore
-
- Client.message_create := check_command
+open Core
+open Disml
+
+let check_command (msg : Message.t) =
+ if String.is_prefix ~prefix:"!ping" msg.content then
+ Message.reply msg "Pong!" >>> ignore
+
+Client.message_create := check_command
]}
*)
@@ -117,4 +117,4 @@ val unknown : (Unknown.t -> unit) ref (**/**)
(* val voice_state_update : (Yojson.Safe.t -> unit) ref *)
-(* val voice_server_update : (Yojson.Safe.t -> unit) ref *)
\ No newline at end of file +(* val voice_server_update : (Yojson.Safe.t -> unit) ref *)
|