aboutsummaryrefslogtreecommitdiff
path: root/bin/bot.ml
diff options
context:
space:
mode:
Diffstat (limited to 'bin/bot.ml')
-rw-r--r--bin/bot.ml8
1 files changed, 4 insertions, 4 deletions
diff --git a/bin/bot.ml b/bin/bot.ml
index 7d7f714..a1bbf00 100644
--- a/bin/bot.ml
+++ b/bin/bot.ml
@@ -1,13 +1,13 @@
open Async
open Core
+open Disml
-module Client = Disml.Client.Make(struct
+let main () =
let token = match Sys.getenv "DISCORD_TOKEN" with
| Some t -> t
| None -> failwith "No token in env"
-end)(Handler)
-
-let main () =
+ in
+ Client.create token;
Client.start ()
>>> fun client ->
Clock.every