fix matches of the following month being included in the schedules

2025-06-28 17:28:04 -03:00 · 2025-06-28 17:28:04 -03:00 · 8af5cb0d33
commit 8af5cb0d33
parent 88456e17ca
1 changed files with 1 additions and 1 deletions
--- a/lib/lib.ml
+++ b/lib/lib.ml
@ -121,7 +121,7 @@ module Tournament = struct
               | Completed t -> t.start_timestamp
             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 ->
             let timestamp =
               match x.status with