fix matches of the following month being included in the schedules
This commit is contained in:
parent
88456e17ca
commit
8af5cb0d33
1 changed files with 1 additions and 1 deletions
|
|
@ -121,7 +121,7 @@ module Tournament = struct
|
||||||
| Completed t -> t.start_timestamp
|
| Completed t -> t.start_timestamp
|
||||||
in
|
in
|
||||||
let t = ts |> float_of_int |> Unix.localtime in
|
let t = ts |> float_of_int |> Unix.localtime in
|
||||||
t.tm_mday = day.tm_mday)
|
t.tm_mday = day.tm_mday && t.tm_mon = day.tm_mon)
|
||||||
|> List.map (fun x ->
|
|> List.map (fun x ->
|
||||||
let timestamp =
|
let timestamp =
|
||||||
match x.status with
|
match x.status with
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue