From ad6415d4dd2e7a595f4aa8a5e231ac875f61903c Mon Sep 17 00:00:00 2001 From: Adelyn Breelove Date: Mon, 14 Jan 2019 08:32:20 -0700 Subject: Member methods are here --- lib/s.ml | 18 ++++++++---------- 1 file changed, 8 insertions(+), 10 deletions(-) (limited to 'lib/s.ml') 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 -- cgit v1.2.3