github: ocamlfmt

Author: dombong

lib/github.ml

@@ -144,11 +144,9 @@ let gh_link_of_string url_str =
       with _ -> None
     in
     let verify_compare_basehead repo basehead =
-   
-        match Re2.find_submatches_exn compare_basehead_re basehead with
-        | [| _; Some base; _; Some merge |] -> Some (Compare (repo, (base, merge)))
-        | _
-        | exception Re2.Exceptions.Regex_match_failed _ -> None
+      match Re2.find_submatches_exn compare_basehead_re basehead with
+      | [| _; Some base; _; Some merge |] -> Some (Compare (repo, (base, merge)))
+      | _ | (exception Re2.Exceptions.Regex_match_failed _) -> None
     in
     begin
       try