diff options
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/bot.ml | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -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 |