R/logger.R
with_log_threshold.RdEvaluate R expression with a temporarily updated log level threshold
with_log_threshold(
expression,
threshold = ERROR,
namespace = "global",
index = 1
)log_threshold(TRACE)
log_trace("Logging everything!")
#> TRACE [2025-09-17 13:55:17] Logging everything!
x <- with_log_threshold(
{
log_info("Now we are temporarily suppressing eg INFO messages")
log_warn("WARN")
log_debug("Debug messages are suppressed as well")
log_error("ERROR")
invisible(42)
},
threshold = WARN
)
#> WARN [2025-09-17 13:55:17] WARN
#> ERROR [2025-09-17 13:55:17] ERROR
x
#> [1] 42
log_trace("DONE")
#> TRACE [2025-09-17 13:55:17] DONE