aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorMishio595 <[email protected]>2018-11-13 18:42:47 -0700
committerMishio595 <[email protected]>2018-11-13 18:42:47 -0700
commit9c910343f13400c9867dc0841e52a6b4510633ad (patch)
tree9da8fb076a861afc5d21fff705484a0a57e9ab9a /lib
parentA few more sharding improvements (diff)
downloaddisml-9c910343f13400c9867dc0841e52a6b4510633ad.tar.xz
disml-9c910343f13400c9867dc0841e52a6b4510633ad.zip
New name who dis
Diffstat (limited to 'lib')
-rw-r--r--lib/client/sharder.ml4
-rw-r--r--lib/dis.ml (renamed from lib/animus.ml)0
-rw-r--r--lib/http.ml2
3 files changed, 3 insertions, 3 deletions
diff --git a/lib/client/sharder.ml b/lib/client/sharder.ml
index 4165413..18d1da0 100644
--- a/lib/client/sharder.ml
+++ b/lib/client/sharder.ml
@@ -138,8 +138,8 @@ module Shard = struct
("token", `String shard.token);
("properties", `Assoc [
("$os", `String Sys.os_type);
- ("$device", `String "animus");
- ("$browser", `String "animus")
+ ("$device", `String "dis.ml");
+ ("$browser", `String "dis.ml")
]);
("compress", `Bool false); (* TODO add compression handling*)
("large_threshold", `Int 250);
diff --git a/lib/animus.ml b/lib/dis.ml
index e69de29..e69de29 100644
--- a/lib/animus.ml
+++ b/lib/dis.ml
diff --git a/lib/http.ml b/lib/http.ml
index 105ae34..b6b0298 100644
--- a/lib/http.ml
+++ b/lib/http.ml
@@ -20,7 +20,7 @@ module Base = struct
let token = try
Sys.getenv "DISCORD_TOKEN"
with Not_found -> failwith "Please provide a token" in
- let h = Header.init_with "User-Agent" "Animus v0.1.0" in
+ let h = Header.init_with "User-Agent" "Dis.ml v0.1.0" in
let h = Header.add h "Authorization" ("Bot " ^ token) in
Header.add h "Content-Type" "application/json"