From 9c910343f13400c9867dc0841e52a6b4510633ad Mon Sep 17 00:00:00 2001
From: Mishio595 <tenseiken595@gmail.com>
Date: Tue, 13 Nov 2018 18:42:47 -0700
Subject: New name who dis

---
 lib/animus.ml         | 0
 lib/client/sharder.ml | 4 ++--
 lib/dis.ml            | 0
 lib/http.ml           | 2 +-
 4 files changed, 3 insertions(+), 3 deletions(-)
 delete mode 100644 lib/animus.ml
 create mode 100644 lib/dis.ml

(limited to 'lib')

diff --git a/lib/animus.ml b/lib/animus.ml
deleted file mode 100644
index e69de29..0000000
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/dis.ml b/lib/dis.ml
new file mode 100644
index 0000000..e69de29
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"
 
-- 
cgit v1.2.3