aboutsummaryrefslogtreecommitdiff
path: root/lib/models/user.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/models/user.ml')
-rw-r--r--lib/models/user.ml20
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