mlr-org · be-marc · Jan 13, 2025 · Jan 12, 2025 · Jan 13, 2025
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -22,6 +22,7 @@ Depends:
 Imports:
     backports (>= 0.1.5),
     checkmate,
+    cli,
     data.table,
     digest,
     methods,
@@ -47,6 +48,7 @@ Collate:
     'assert_ro_binding.R'
     'calculate_hash.R'
     'capitalize.R'
+    'cat_cli.R'
     'catn.R'
     'check_operators.R'
     'check_packages_installed.R'

diff --git a/NAMESPACE b/NAMESPACE
@@ -54,6 +54,7 @@ export(assert_ro_binding)
 export(calculate_hash)
 export(call_back)
 export(capitalize)
+export(cat_cli)
 export(catf)
 export(catn)
 export(check_packages_installed)
@@ -171,6 +172,9 @@ import(checkmate)
 import(data.table)
 importFrom(R6,R6Class)
 importFrom(R6,is.R6)
+importFrom(cli,cli_format_method)
+importFrom(cli,cli_h1)
+importFrom(cli,cli_li)
 importFrom(digest,digest)
 importFrom(methods,formalArgs)
 importFrom(methods,hasArg)

diff --git a/NEWS.md b/NEWS.md
@@ -2,6 +2,7 @@
 
 * feat: `as_callbacks()` returns a list named by the callback ids now.
 * feat: Added logical operators `%check&&%` and `%check||%` for `check_*`-functions from `checkmate` (moved here from `mlr3pipelines`).
+* Added helper `cat_cli()`.
 
 # mlr3misc 0.16.0
 

diff --git a/R/cat_cli.R b/R/cat_cli.R
@@ -0,0 +1,18 @@
+#' @title Function to transform message to output
+#'
+#' @description
+#' Wrapper around [cli::cli_format_method()].
+#' Uses [base::cat()] to transform the printout from a message to an output with a line break.
+#'
+#' @param expr (`any`)\cr
+#'   Expression that calls `cli_*` methods, [base::cat()] or[base::print()] to format an object's printout.
+#'
+#' @export
+#' @examples
+#' cat_cli({
+#'   cli::cli_h1("Heading")
+#'   cli::cli_li(c("x", "y"))
+#' })
+cat_cli = function(expr) {
+  cat(cli::cli_format_method(expr), sep = "\n")
+}
diff --git a/R/zzz.R b/R/zzz.R
@@ -6,6 +6,7 @@
 #' @importFrom digest digest
 #' @importFrom methods formalArgs hasArg
 #' @importFrom utils capture.output
+#' @importFrom cli cli_h1 cli_li cli_format_method
 "_PACKAGE"
 
 .onLoad = function(libname, pkgname) {

diff --git a/man/cat_cli.Rd b/man/cat_cli.Rd