diff options
Diffstat (limited to 'lib/models/user.ml')
| -rw-r--r-- | lib/models/user.ml | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/lib/models/user.ml b/lib/models/user.ml deleted file mode 100644 index bd6583c..0000000 --- a/lib/models/user.ml +++ /dev/null @@ -1,20 +0,0 @@ -open Core -include User_t - -let tag user = - Printf.sprintf "%s#%s" user.username user.discriminator - -let mention user = - Printf.sprintf "<@%d>" user.id - -let default_avatar user = - let avatar = Int.of_string user.discriminator % 5 in - Endpoints.cdn_default_avatar avatar - -let face user = 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 avatar ext - | None -> default_avatar user
\ No newline at end of file |