This commit is contained in:
Simon Cruanes 2026-02-13 20:38:03 -05:00
parent 649d4b8aa8
commit 8b9ea57a02
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
3 changed files with 5 additions and 3 deletions

View file

@ -145,8 +145,9 @@ module Env () : ENV = struct
| Some "info" -> Log_level_info | Some "info" -> Log_level_info
| Some "debug" -> Log_level_debug | Some "debug" -> Log_level_debug
| Some s -> | Some s ->
Printf.eprintf "warning: unknown log level %S\n%!" s; Printf.eprintf "warning: unknown log level %S, defaulting to info\n%!" s;
Log_level_none (* log in info level, so we at least don't miss warnings and errors *)
Log_level_info
| None -> | None ->
if get_debug_from_env () then if get_debug_from_env () then
Log_level_debug Log_level_debug

View file

@ -16,7 +16,7 @@ type log_level =
| Log_level_debug | Log_level_debug
type rest type rest
(** Opaque type to force using {!make} while allowing record updates *) (** opaque type to force using {!make} while allowing record updates *)
type t = { type t = {
debug: bool; [@alert deprecated "Use log_level instead"] debug: bool; [@alert deprecated "Use log_level instead"]

View file

@ -1,3 +1,4 @@
(** @deprecated Use {!Exporter_config} instead *) (** @deprecated Use {!Exporter_config} instead *)
include module type of Exporter_config include module type of Exporter_config
[@@deprecated "use Exporter_config instead"]