diff options
| author | Adelyn Breedlove <[email protected]> | 2019-03-01 23:15:23 -0700 |
|---|---|---|
| committer | Adelyn Breedlove <[email protected]> | 2019-03-01 23:15:23 -0700 |
| commit | ef28f111cfec95a62b21a9267f9d24b1edc645dd (patch) | |
| tree | c5a93c0072823aaeac425f6263c076333b55d225 /lib/gateway/dispatch.mli | |
| parent | Remove use of Tyre in favour of Str lib (diff) | |
| download | disml-ef28f111cfec95a62b21a9267f9d24b1edc645dd.tar.xz disml-ef28f111cfec95a62b21a9267f9d24b1edc645dd.zip | |
Style improvements who dis
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 *)
|