aboutsummaryrefslogtreecommitdiffstats
path: root/lib/utilities.ml
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--lib/utilities.ml8
1 files changed, 3 insertions, 5 deletions
diff --git a/lib/utilities.ml b/lib/utilities.ml
index 7b77da9..7e47d2e 100644
--- a/lib/utilities.ml
+++ b/lib/utilities.ml
@@ -16,9 +16,7 @@ let print_with_time str =
let orange = "\027[38;5;208m" in
let reset = "\027[0m" in
let formatted_time =
- Printf.sprintf "%04d-%02d-%02d %02d:%02d:%02d" (tm.Unix.tm_year + 1900)
- (tm.Unix.tm_mon + 1) tm.Unix.tm_mday tm.Unix.tm_hour tm.Unix.tm_min
- tm.Unix.tm_sec
+ Printf.sprintf "%04d-%02d-%02d %02d:%02d:%02d" (tm.Unix.tm_year + 1900) (tm.Unix.tm_mon + 1)
+ tm.Unix.tm_mday tm.Unix.tm_hour tm.Unix.tm_min tm.Unix.tm_sec
in
- print_endline
- @@ Printf.sprintf "%s[%s]%s %s" orange formatted_time reset str
+ print_endline @@ Printf.sprintf "%s[%s]%s %s" orange formatted_time reset str