diff --git a/.ocamlformat b/.ocamlformat index 4ee2978..7aac18a 100644 --- a/.ocamlformat +++ b/.ocamlformat @@ -1,4 +1,4 @@ -version=0.19.0 +version=0.20.1 align-cases=false align-constructors-decl=false align-variants-decl=false diff --git a/src/permap.ml b/src/permap.ml index b85bd41..1c6a8d0 100644 --- a/src/permap.ml +++ b/src/permap.ml @@ -199,7 +199,8 @@ let newthread_post ~board request = let adress = Format.asprintf "/%a/%s" Babillard.pp_board board thread_id in - Dream.respond ~status:`See_Other ~headers:[ ("Location", adress) ] + Dream.respond ~status:`See_Other + ~headers:[ ("Location", adress) ] "Your thread was posted!" | Error e -> render_unsafe e request ) ) ) | `Ok _ -> Dream.empty `Bad_Request @@ -253,7 +254,8 @@ let reply_post request = match res with | Ok post_id -> let adress = Format.sprintf "/babillard/%s#%s" parent_id post_id in - Dream.respond ~status:`See_Other ~headers:[ ("Location", adress) ] + Dream.respond ~status:`See_Other + ~headers:[ ("Location", adress) ] "Your reply was posted!" | Error e -> render_unsafe e request ) | `Ok _ -> Dream.empty `Bad_Request