(v3.0.1.9038) fix format inline

R/aa_helper_functions.R

@@ -423,6 +423,9 @@ highlight_code <- function(code) {
 format_inline_ <- function(...) {
   msg <- paste0(c(...), collapse = "")
   if (pkg_is_available("cli", min_version = "3.0.0")) {
+    if (!cli::ansi_has_hyperlink_support()) {
+      msg <- simplify_help_markup(msg)
+    }
     cli::format_inline(msg)
   } else {
     cli_to_plain(msg, envir = parent.frame())

R/mo_property.R

@@ -270,7 +270,6 @@ mo_shortname <- function(x, language = get_AMR_locale(), keep_synonyms = getOpti
 }
 
 
-
 #' @rdname mo_property
 #' @export
 mo_subspecies <- function(x, language = get_AMR_locale(), keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...) {

R/tidymodels.R

@@ -122,13 +122,14 @@ all_disk_predictors <- function() {
 #' @rdname amr-tidymodels
 #' @export
 step_mic_log2 <- function(
-    recipe,
-    ...,
-    role = NA,
-    trained = FALSE,
-    columns = NULL,
-    skip = FALSE,
-    id = recipes::rand_id("mic_log2")) {
+  recipe,
+  ...,
+  role = NA,
+  trained = FALSE,
+  columns = NULL,
+  skip = FALSE,
+  id = recipes::rand_id("mic_log2")
+) {
   recipes::add_step(
     recipe,
     step_mic_log2_new(
@@ -197,13 +198,14 @@ tidy.step_mic_log2 <- function(x, ...) {
 #' @rdname amr-tidymodels
 #' @export
 step_sir_numeric <- function(
-    recipe,
-    ...,
-    role = NA,
-    trained = FALSE,
-    columns = NULL,
-    skip = FALSE,
-    id = recipes::rand_id("sir_numeric")) {
+  recipe,
+  ...,
+  role = NA,
+  trained = FALSE,
+  columns = NULL,
+  skip = FALSE,
+  id = recipes::rand_id("sir_numeric")
+) {
   recipes::add_step(
     recipe,
     step_sir_numeric_new(