Fix dune build @fmt (#800)

mirage · Feb 23, 2023 · 2af5336 · 2af5336
1 parent 4a2f94a
commit 2af5336
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/data/gen_data.ml b/data/gen_data.ml
@@ -58,8 +58,9 @@ module Blog = struct
     ; permalink = %a
     ; body = %a
     }|}
-      (Ptime.to_float_s v.updated) (Pp.list People.pp) v.authors Pp.string
-      v.subject Pp.string v.permalink Pp.string v.body
+      (Ptime.to_float_s v.updated)
+      (Pp.list People.pp) v.authors Pp.string v.subject Pp.string v.permalink
+      Pp.string v.body
 end
 
 module Wiki = struct

diff --git a/template/util.ml b/template/util.ml
@@ -1,3 +1,3 @@
 let date_to_string ptime =
-  let (year, month, day) = Ptime.to_date ptime in
+  let year, month, day = Ptime.to_date ptime in
   Fmt.str "%04d-%02d-%02d" year month day