From b2f081fff12093a7d3434859ebd621608dde6c7d Mon Sep 17 00:00:00 2001 From: Matias Goldfeld Date: Sun, 7 Feb 2021 20:21:47 -0500 Subject: Reverted earlier changes for good --- lib/models/user/user.ml | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'lib/models/user/user.ml') diff --git a/lib/models/user/user.ml b/lib/models/user/user.ml index 8b14b76..b8c3b25 100644 --- a/lib/models/user/user.ml +++ b/lib/models/user/user.ml @@ -5,17 +5,19 @@ let tag user = Printf.sprintf "%s#%s" user.username user.discriminator let mention user = - Printf.sprintf "<@%Ld>" (User_id.get_id user.id) + let `User_id id = user.id in + Printf.sprintf "<@%d>" id let default_avatar user = - let avatar = Int64.(of_string user.discriminator % 5L) in + let avatar = Int.of_string user.discriminator % 5 in Endpoints.cdn_default_avatar avatar let face user = + let `User_id id = user.id in match user.avatar with | Some avatar -> let ext = if String.is_substring ~substring:"a_" avatar then "gif" else "png" in - Endpoints.cdn_avatar (User_id.get_id user.id) avatar ext + Endpoints.cdn_avatar id avatar ext | None -> default_avatar user \ No newline at end of file -- cgit v1.2.3