diff options
Diffstat (limited to 'bin/handler.ml')
| -rw-r--r-- | bin/handler.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/handler.ml b/bin/handler.ml index 5b22527..43d908e 100644 --- a/bin/handler.ml +++ b/bin/handler.ml @@ -4,7 +4,7 @@ module Make(Models : Disml.S.Models) = struct open Models open Disml.Event - let check_command (msg:Disml.Message_t.t) = + let check_command (msg:Message.t) = if String.is_prefix ~prefix:"!ping" msg.content then Message.reply msg "Pong!" >>> ignore else if String.is_prefix ~prefix:"!spam" msg.content then |