aboutsummaryrefslogtreecommitdiff
path: root/lib/s.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/s.ml')
-rw-r--r--lib/s.ml18
1 files changed, 8 insertions, 10 deletions
diff --git a/lib/s.ml b/lib/s.ml
index 86446aa..c1c4583 100644
--- a/lib/s.ml
+++ b/lib/s.ml
@@ -1,6 +1,6 @@
open Async
-module type Token = sig
+module type ClientOptions = sig
val token : string
end
@@ -46,15 +46,13 @@ end
module type Member = sig
type t = Member_t.t
- (* val add_role : Member_t.t -> Role_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val remove_role : Member_t.t -> Role_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val ban : ?reason:string -> ?days:int -> Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val ban : ?reason:string -> Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val kick : ?reason:string -> Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val mute : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val deafen : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val unmute : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val undeafen : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t *)
+ val add_role : role:Role_t.t -> Member_t.t -> unit Deferred.Or_error.t
+ val remove_role : role:Role_t.t -> Member_t.t -> unit Deferred.Or_error.t
+ val ban : ?reason:string -> ?days:int -> Member_t.t -> unit Deferred.Or_error.t
+ val kick : ?reason:string -> Member_t.t -> unit Deferred.Or_error.t
+ val deafen : Member_t.t -> unit Deferred.Or_error.t
+ val unmute : Member_t.t -> unit Deferred.Or_error.t
+ val undeafen : Member_t.t -> unit Deferred.Or_error.t
end
module type Reaction = sig