package gitlab-unix

  1. Overview
  2. Docs

Source file gitlab.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
module Time = struct
  let now = Unix.gettimeofday

  let sleep = Lwt_unix.sleep
end

module Env = struct
  let debug = try Unix.getenv "GITLAB_DEBUG" <> "0" with _ -> false

  let gitlab_uri =
    try Unix.getenv "GITLAB_URL" with _ -> "https://gitlab.com/api/v4"
end

include Gitlab_core.Make (Env) (Time) (Cohttp_lwt_unix.Client)
OCaml

Innovation. Community. Security.