aboutsummaryrefslogtreecommitdiff
path: root/lib/listenbrainz.mli
diff options
context:
space:
mode:
authorRyan Kavanagh <rak@rak.ac>2021-11-07 11:29:58 -0500
committerRyan Kavanagh <rak@rak.ac>2021-11-07 11:29:58 -0500
commit0051e6f68eb19a38984f2538c35f414f9fa1ed7b (patch)
treed39275d5e23d4cd84b51e862a6a1733a762d953d /lib/listenbrainz.mli
parentInitial client that can validate tokens and get listens (diff)
Refactor
Diffstat (limited to 'lib/listenbrainz.mli')
-rw-r--r--lib/listenbrainz.mli9
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