Formatting

jonludlam · jonludlam · commit eb82d5050d66 · 2025-02-21T11:45:49.000Z
diff --git a/src/model/error.mli b/src/model/error.mli
@@ -41,7 +41,8 @@ val catch_errors_and_warnings : (unit -> 'a) -> 'a with_errors_and_warnings
 type warnings_options = {
   warn_error : bool;  (** If [true], warnings will result in an error. *)
   print_warnings : bool;  (** Whether to print warnings. *)
-  warnings_tag : string option;  (** Whether to tag references to filter them later. *)
+  warnings_tag : string option;
+      (** Whether to tag references to filter them later. *)
 }
 
 val handle_warnings :
diff --git a/src/odoc/bin/main.ml b/src/odoc/bin/main.ml
@@ -713,7 +713,8 @@ end = struct
 
   let warnings_tags =
     let doc =
-      "Filter warnings that were compiled with a tag that is not in the list of --warnings-tags passed."
+      "Filter warnings that were compiled with a tag that is not in the list \
+       of --warnings-tags passed."
     in
     let env = Arg.env_var "ODOC_WARNINGS_TAGS" ~doc in
     Arg.(value & opt_all string [] & info ~docs ~doc ~env [ "warnings-tags" ])

Original file line number	Diff line number	Diff line change
`@@ -41,7 +41,8 @@ val catch_errors_and_warnings : (unit -> 'a) -> 'a with_errors_and_warnings`
`41`	`41`	`type warnings_options = {`
`42`	`42`	`warn_error : bool; (** If [true], warnings will result in an error. *)`
`43`	`43`	`print_warnings : bool; (** Whether to print warnings. *)`
`44`		`- warnings_tag : string option; (** Whether to tag references to filter them later. *)`
	`44`	`+ warnings_tag : string option;`
	`45`	`+ (** Whether to tag references to filter them later. *)`
`45`	`46`	`}`
`46`	`47`
`47`	`48`	`val handle_warnings :`