fix
This commit is contained in:
parent
a3603f7c85
commit
d4b3fcb61d
2 changed files with 8 additions and 9 deletions
16
bin/main.ml
16
bin/main.ml
|
|
@ -80,6 +80,13 @@ let tournaments : Lib.tournament_scrape_context list =
|
||||||
filter_foreigners = false;
|
filter_foreigners = false;
|
||||||
timezone_offset = Some ~-5;
|
timezone_offset = Some ~-5;
|
||||||
};
|
};
|
||||||
|
{
|
||||||
|
id = 11653;
|
||||||
|
season = 71131;
|
||||||
|
name = "CHL1";
|
||||||
|
filter_foreigners = false;
|
||||||
|
timezone_offset = Some ~-4;
|
||||||
|
};
|
||||||
{
|
{
|
||||||
id = 390;
|
id = 390;
|
||||||
season = 72603;
|
season = 72603;
|
||||||
|
|
@ -94,13 +101,6 @@ let tournaments : Lib.tournament_scrape_context list =
|
||||||
filter_foreigners = false;
|
filter_foreigners = false;
|
||||||
timezone_offset = Some ~-4;
|
timezone_offset = Some ~-4;
|
||||||
};
|
};
|
||||||
{
|
|
||||||
id = 11653;
|
|
||||||
season = 71131;
|
|
||||||
name = "CHL1";
|
|
||||||
filter_foreigners = false;
|
|
||||||
timezone_offset = Some ~-4;
|
|
||||||
};
|
|
||||||
{
|
{
|
||||||
id = 11541;
|
id = 11541;
|
||||||
season = 69831;
|
season = 69831;
|
||||||
|
|
@ -163,6 +163,6 @@ let f () =
|
||||||
while true do
|
while true do
|
||||||
print_endline "fetching matches...";
|
print_endline "fetching matches...";
|
||||||
f ();
|
f ();
|
||||||
print_endline "\nupdated. sleeping for 5 minutes";
|
print_endline "updated. sleeping for 5 minutes";
|
||||||
Unix.sleep 300
|
Unix.sleep 300
|
||||||
done
|
done
|
||||||
|
|
|
||||||
|
|
@ -163,7 +163,6 @@ exception Status_Not_found
|
||||||
(* TODO: handle "resolution fai led: name resolution failed" *)
|
(* TODO: handle "resolution fai led: name resolution failed" *)
|
||||||
let get url : string =
|
let get url : string =
|
||||||
let http_get url =
|
let http_get url =
|
||||||
Printf.printf "\r%-90s" url;
|
|
||||||
Stdlib.flush Stdlib.stdout;
|
Stdlib.flush Stdlib.stdout;
|
||||||
let* resp, body = Cohttp_lwt_unix.Client.get (Uri.of_string url) in
|
let* resp, body = Cohttp_lwt_unix.Client.get (Uri.of_string url) in
|
||||||
let code = resp |> Cohttp.Response.status |> Cohttp.Code.code_of_status in
|
let code = resp |> Cohttp.Response.status |> Cohttp.Code.code_of_status in
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue