diff options
Diffstat (limited to 'lib/models/user.ml')
| -rw-r--r-- | lib/models/user.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/models/user.ml b/lib/models/user.ml index b83781d..8edcea1 100644 --- a/lib/models/user.ml +++ b/lib/models/user.ml @@ -3,13 +3,13 @@ module Make(Http : S.Http) = struct include User_t let tag user = - Printf.sprintf "%s#%d" user.username user.discriminator + Printf.sprintf "%s#%s" user.username user.discriminator let mention user = Printf.sprintf "<@%d>" user.id let default_avatar user = - let avatar = user.discriminator % 5 in + let avatar = Int.of_string user.discriminator % 5 in Endpoints.cdn_default_avatar avatar let face user = match user.avatar with |