diff options
Diffstat (limited to 'lib/models/user/user.ml')
| -rw-r--r-- | lib/models/user/user.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/models/user/user.ml b/lib/models/user/user.ml index b8c3b25..0d76d23 100644 --- a/lib/models/user/user.ml +++ b/lib/models/user/user.ml @@ -6,10 +6,10 @@ let tag user = let mention user =
let `User_id id = user.id in
- Printf.sprintf "<@%d>" id
+ Printf.sprintf "<@%Ld>" id
let default_avatar user =
- let avatar = Int.of_string user.discriminator % 5 in
+ let avatar = Int64.(of_string user.discriminator % 5L) in
Endpoints.cdn_default_avatar avatar
let face user =
|