1 files changed, 5 insertions, 4 deletions
diff --git a/lib/vcl/sublanguage.ml b/lib/vcl/sublanguage.ml
index 4319eb8..437c93b 100644
--- a/lib/vcl/sublanguage.ml
+++ b/lib/vcl/sublanguage.ml
@@ -1,7 +1,9 @@
 module Make (NT : Nt.S) = struct
   module Error = struct
     open Condition
-    let unrecognized_command expr = condition "unrecognized-command" "Unrecognized command" ("expression" |=| (of_sexp expr))
+
+    let unrecognized_command expr =
+      condition "unrecognized-command" "Unrecognized command" ("expression" |=| of_sexp expr)
   end
 
   module Exec = Executor.Make (NT)
@@ -13,9 +15,8 @@ module Make (NT : Nt.S) = struct
   let parse _ = Ok ()
 
   let parse_sexp = function
-    | Sexplib.Sexp.(List [ Atom "use"; Atom branch ]) -> Ok (Ast.Use branch)
-    | sexp ->
-        Error (Error.unrecognized_command sexp)
+    | Sexplib.Sexp.(List [Atom "use"; Atom branch]) -> Ok (Ast.Use branch)
+    | sexp -> Error (Error.unrecognized_command sexp)
 
   let execute = Exec.execute
 end