Source

ocaml-bitbucket / api.ml

Diff from to

File api.ml

     type t = Data.Branch.t mc_fields with conv(json, ocaml)
 
     let get ~accountname ~repo_slug = 
-      Format.eprintf "%s : %s...@." accountname repo_slug;
+      (* Format.eprintf "%s : %s...@." accountname repo_slug; *) (* CR jfuruse: LOG *)
       Json.curl_get_and_parse 
         t_of_json
         (fun h ->