From 5575d2c2c5dcd3abe4ab47f2e8318a38152ea3d7 Mon Sep 17 00:00:00 2001
From: Mylloon <kennel.anri@tutanota.com>
Date: Mon, 15 May 2023 14:56:41 +0200
Subject: [PATCH] readability

---
 bin/twitter.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/bin/twitter.ml b/bin/twitter.ml
index 1521b1b..f7ad4be 100644
--- a/bin/twitter.ml
+++ b/bin/twitter.ml
@@ -127,8 +127,9 @@ let find_latest_tweet ctx =
             Core.Time.of_string_with_utc_offset
               (get_attribute ctx.session_id date "datetime")
           in
-          Core.Time.to_span_since_epoch time |> Core.Time.Span.to_sec |> Float.to_int)
+          Float.to_int (Core.Time.Span.to_sec (Core.Time.to_span_since_epoch time)))
         dates
     in
+    (* Returns the most recent date *)
     Some (List.fold_left max min_int datetimes)
 ;;