Show class name in unknown tag message

r-lib · Feb 15, 2024 · 982581e · 982581e
1 parent 3979e7c
commit 982581e
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/rd-html.R b/R/rd-html.R
@@ -513,7 +513,8 @@ as_html.tag <- function(x, ...) {
   if (identical(class(x), "tag")) {
     flatten_text(x, ...)
   } else {
-    cli::cli_inform("Unknown tag: ", paste(class(x), collapse = "/"))
+    untag <- paste(class(x), collapse = "/")
+    cli::cli_warn("Unknown tag: {.val {untag}}")
     ""
   }
 }