slack 0.1 · OCaml Package

Module for mocking test requests to slack--will output on Stdio

val cwd : string

val cache_dir : string

val with_cache_file : 
  string ->
  (string -> 'a) ->
  ('a, [> `Other of string ]) result Lwt.t

return the file with a function f applied unless the file is empty; empty file:this is needed to simulate 404 returns from github

val default_post_message_res : Slack_t.post_message_res

val default_update_message_res : Slack_t.update_message_res

val default_files_res : Slack_t.file

val default_files_upload_res : Slack_t.files_upload_res

val send_message : 
  ctx:'a ->
  msg:Slack_j.post_message_req ->
  (Slack_t.post_message_res, 'b) result Lwt.t

val send_message_webhook : 
  ctx:'a ->
  url:string ->
  msg:Slack_j.post_message_req ->
  (unit, 'b) result Lwt.t

val update_message : 
  ctx:'a ->
  msg:Slack_j.update_message_req ->
  (Slack_t.update_message_res, 'b) result Lwt.t

val upload_file : 
  ctx:'a ->
  file:Slack_j.files_upload_req ->
  (Slack_t.files_upload_res, [> `Other of string ]) result Lwt.t

val join_conversation : 
  ctx:'a ->
  channel:Slack_t.conversations_join_req ->
  (Slack_j.conversations_join_res, [> `Other of string ]) result Lwt.t

val send_chat_unfurl : 
  ctx:'a ->
  req:Slack_t.chat_unfurl_req ->
  (unit, 'b) result Lwt.t

val update_usergroup_users : 
  ctx:'a ->
  usergroup:Slack_t.update_usergroups_users_req ->
  (Slack_j.update_usergroups_users_res, [> `Other of string ]) result Lwt.t

val get_replies : 
  ctx:'a ->
  conversation:Slack_t.conversations_replies_req ->
  (Slack_j.conversations_replies_res, [> `Other of string ]) result Lwt.t

val get_conversations_info : 
  ctx:'a ->
  conversation:Slack_t.conversations_info_req ->
  (Slack_j.conversations_info_res, [> `Other of string ]) result Lwt.t

val get_user : 
  ctx:'a ->
  user:Slack_t.user_info_req ->
  (Slack_j.user_info_res, [> `Other of string ]) result Lwt.t

val list_usergroups : 
  ctx:'a ->
  req:Slack_t.list_usergroups_req ->
  (Slack_j.list_usergroups_res, [> `Other of string ]) result Lwt.t

val list_usergroup_users : 
  ctx:'a ->
  usergroup:Slack_t.list_usergroup_users_req ->
  (Slack_j.list_usergroup_users_res, [> `Other of string ]) result Lwt.t

val list_users : 
  ctx:'a ->
  req:Slack_t.list_users_req ->
  (Slack_j.list_users_res, [> `Other of string ]) result Lwt.t

val send_auth_test : ctx:'a -> unit -> (Slack_t.auth_test_res, 'b) result Lwt.t

package slack