From e9954bf54e2d09c61e735fd31405db31ff0f7fe2 Mon Sep 17 00:00:00 2001
From: Swrup <swrup@protonmail.com>
Date: Fri, 2 May 2025 19:55:00 +0200
Subject: [PATCH] fmt

---
 .ocamlformat | 2 +-
 src/map.ml   | 3 +--
 src/user.ml  | 3 +--
 3 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/.ocamlformat b/.ocamlformat
index c54116a..eb9f4e0 100644
--- a/.ocamlformat
+++ b/.ocamlformat
@@ -1,4 +1,4 @@
-version=0.24.1
+version=0.27.0
 assignment-operator=end-line
 break-cases=fit
 break-fun-decl=wrap
diff --git a/src/map.ml b/src/map.ml
index ea9c498..ecca65e 100644
--- a/src/map.ml
+++ b/src/map.ml
@@ -64,8 +64,7 @@ let count_wheat map =
       let count' =
         Array.fold_left
           (fun count -> function
-            | Wheat -> succ count
-            | Black | Grass | Water -> count )
+            | Wheat -> succ count | Black | Grass | Water -> count )
           0 a
       in
       count + count' )
diff --git a/src/user.ml b/src/user.ml
index 56aa4ba..8c3ed39 100644
--- a/src/user.ml
+++ b/src/user.ml
@@ -154,8 +154,7 @@ let list () =
   Ok
     (Format.asprintf "<ul>%a</ul>"
        (Format.pp_print_list (fun fmt -> function
-          | s -> Format.fprintf fmt {|<li><a href="/user/%s">%s</a></li>|} s s )
-       )
+         | s -> Format.fprintf fmt {|<li><a href="/user/%s">%s</a></li>|} s s ))
        users )
 
 let get_nick_unsafe request = Option.get @@ Dream.session "nick" request