aboutsummaryrefslogtreecommitdiff
path: root/README.md
diff options
context:
space:
mode:
Diffstat (limited to 'README.md')
-rw-r--r--README.md2
1 files changed, 1 insertions, 1 deletions
diff --git a/README.md b/README.md
index e151d5d..396c77c 100644
--- a/README.md
+++ b/README.md
@@ -47,7 +47,7 @@ open Disml
open Models
(* Create a function to handle message_create. *)
-let check_command (Event.MessageCreate.{message}) =
+let check_command (message:Message.t) =
if String.is_prefix ~prefix:"!ping" message.content then
Message.reply message "Pong!" >>> ignore