doi2bib: make formatter happy

mseri · Mar 24, 2021 · 1aac8e0 · 1aac8e0
1 parent c8815b3
commit 1aac8e0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/bin/doi2bib.ml b/bin/doi2bib.ml
@@ -95,8 +95,8 @@ let rec get ?headers ?fallback uri =
     | None, None ->
       Lwt.fail_with ("Malformed redirection trying to access '" ^ Uri.to_string uri ^ "'."))
   | d when (d = 404 || d = 504) && Option.is_some fallback ->
-    (let* () = Cohttp_lwt.Body.drain_body body in
-     match fallback with
+    let* () = Cohttp_lwt.Body.drain_body body in
+    (match fallback with
     | Some uri -> get ?headers uri
     | None -> assert false)
   | 400 | 404 ->