diff options
author | Ryan Kavanagh <rak@rak.ac> | 2021-11-07 11:29:58 -0500 |
---|---|---|
committer | Ryan Kavanagh <rak@rak.ac> | 2021-11-07 11:29:58 -0500 |
commit | 0051e6f68eb19a38984f2538c35f414f9fa1ed7b (patch) | |
tree | d39275d5e23d4cd84b51e862a6a1733a762d953d /lib/listenbrainz.mli | |
parent | Initial client that can validate tokens and get listens (diff) |
Refactor
Diffstat (limited to 'lib/listenbrainz.mli')
-rw-r--r-- | lib/listenbrainz.mli | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/listenbrainz.mli b/lib/listenbrainz.mli index e3997bd..6037c08 100644 --- a/lib/listenbrainz.mli +++ b/lib/listenbrainz.mli @@ -1,7 +1,8 @@ -type query + type token = string -val do_query : query -> (Cohttp.Response.t * string) Lwt.t - -val get_validate_token : unit -> (bool * Listenbrainz_t.get_validate_token) Lwt.t +val get_validate_token : token -> Listenbrainz_t.get_validate_token Lwt.t val get_listens : string -> Listenbrainz_t.get_user_listens Lwt.t + +val post_submit_listens : token -> Listenbrainz_t.payload_listens -> + (Cohttp.Response.t * Listenbrainz_t.post_submit_listens) Lwt.t |